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GUIDE 81-82 


L'ORDINATEUR 
INDIVIDUEL 


au sommaire : 


e Panorama des ordinateurs valant entre 250 FF et 60 000 FF (plus de 80 matériels). 
e Panorama des imprimantes valant moins de 10 000 FF (plus de 30 matériels). 

e Réactualisation de 22 bancs d’essai parus dans l'OI depuis le N° 1. 

e Annuaire des fournisseurs (plus de 500 adresses). 

e Annuaire des clubs (plus de 200 adresses). 

e Dictionnaire de l'informatique individuelle. 

e Le point sur les nouveautés parues depuis l'été 1980. 

e Et une série d'articles pour vous “guider” sur le chemin de votre informatique individuelle. 























25 FF* chez votre marchand de journaux 


| Pour recevoir, chez vous, le Guide 81-82, 
il vous suffit d'envoyer vos nom et adresse ainsi qu'un chèque de 25 FF à 
L'ORDINATEUR INDIVIDUEL (GUIDE 81-82) 41, rue de la Grange aux Belles - 75483 Paris Cedex 10 


* Etranger 30 FF 















CÉcdbeial 


Voici le premier numéro de La Cemmode, le magazine 
des ordinateurs Commodore. Il est entièrement consacré 
aux ordinateurs Commodore, à toute la gamme Commodore, du 
PET 2001 au CBM 8032 en passant par les 3000 et 4000. Il 
concerne aussi le VIC, le CBM 8096, le CBM 9000 Micro- 
mainframe et tout nouveau modèle susceptible d'apparaî- 
tre, ainsi que les périphériques. 


Il s'adresse à tous les utilisateurs, du débutant 
au plus chevronné. Vous trouverez des trucs, des astuces, 
des adresses mais aussi des explications de fond. Les 
instructions seront expliquées une par une afin de former 
une encyclopédie pour les.débutants, mais à laquelle les 
vétérans pourront toujours se référer. 


La Commode est indépendante de tout constructeur. 
Nous publierons des évaluations et des bancs d'essai des 
nouveaux modèles, des logiciels, des périphériques non 
Commodore. 


Voici une liste non limitative des différentes ru- 

briques qui apparaîtront régulièrement: 

-Nouveautés-Actualités. Tous les potins sur les annon- 
ces:,les salons... 

-Langages. En principe BASIC, Assembleur, PASCAL mais 
aussi COMAL,-FORTH, LISP... 

-Hardware-Interfaces. Des montages, des manips. A vos 
fers à souder! 

-Applications. Traitez vos problèmes dans le monde 
réel. Gérez efficacement votre entreprise. 

-Disques et périphériques. Des bancs d'essai, mais 
aussi des conseils, des astuces d'utilisation et des 
précautions à prendre. 

Nous avons aussi une rubrique enseignement et "les 
jeux cousus-main de Jacques COUTHURES". 

La rubrique bibliographie est représentée dans ce 
premier numéro par un rappel des articles qui ont été 
consacrés au PET/CBM dans l'Ordinateur Individuel et dans 
Microsystèmes. 


Mais nous vous rappelons que c'est vous, lecteurs, 
qui ferez véritablement ce magazine, en nous envoyant vos 
opinions, vos idées, vos trucs, vos programmes. Ce maga- 
zine doit être un lieu d'échange entre utilisateurs Con- 
modore et distributeurs, et non un recueil de cours ma- 
gistraux faits par la Rédaction. A vos plumes! 


Bien sûr, il y aura un courrier des lecteurs. Nous 
voulons bien aussi publier gratuitement vos annonces - 
honnêtes! mais attention au délai entre les numéros! 
Enfin nos colonnes sont ouvertes aux clubs et à tous ceux 
qui souhaitent former un club. Contactez-nous. 


Daniel-Jean DAVID 


Cm pos 


C COMMODORE LEADER EU 





C'est par l'innovation continue, fruit de la 
maîtrise des techniques de pointe, que Com- 
modore a conquis sa place de leader européen 
de la micro-informatique. Cette position, 
bien connue de tous ceux qui suivent de près 
l'actualité informatique, vient d’être corro- 
borée par la publication d’une récente étude 
de marché conduite par la firme indépendante 
LDC. (D). 


La conséquence la plus notable de cette bril- 
lante performance, s’est traduite par un ren- 
forcement des structures européennes de 
Commodore aux plans marketing et fabri- 
cation. 


C'est ainsi que Commodore a récemment 
ouvert une usine en R.F.A., à Braun- 
schweig, afin de répondre aux besoins crois- 
sants du marche européen. 

A quelles qualités particulières doit-on attri- 
buer le succès des micro-ordinateurs de la 
gamme Commodore ? 


- la fiabilité exceptionnelle, résultat d’une 
électronique particulièrement bien conçue 
et fabriquée avec beaucoup de soins à partir 
de composants de qualité, 

- l'excellent rapport prix performances ; 
Commodore vous en donne plus pour votre 
investissement, 


la parfaite homogénéité de la gamme et 
l'architecture décentralisée des systèmes où 
chaque périphérique est intelligent, 

des produits toujours ‘‘dans le vent””, qui 
bénéficient des unités intégrées de recher- 
che, de développement et de production 
mises en place par Commodore depuis 
1975 : la gamme Commodore répond ainsi 
aux besoins variés et croissants du marché, 


les maxi-services Procep, qui apportent 
aux utilisateurs français de la gamme 
Commodore, un environnement adapté à 
leurs besoins. Une plus-value très impor- 
tante et très appréciée. 


LEDC. Europa Ltd. 2 Bath Road, LONDON 
ILN 


LN 


La gamme Commodore, harmonieuse et 
complète, répond aux besoins les plus divers 
des débutants comme des virtuoses de la 
micro-informatique. 


Entrez dans l’univers fabuleux de la 
micro-informatique avec le Commodore 
VIC 20*. 

Oui, initiez-vous avec un vrai micro-ordina- 
teur, puissant et évolutif. et cependant à un 
prix époustouflant. Le VIC 20 vous permet 
de donner libre cours à votre créativité en 
disposant d’un micro-ordinateur de qualité, 
bien à vous, chez vous. 

* le Commodore VIC 20 est disponible en 
version PAL: ultérieurement une version 
SECAM, développée par Procep, sera mise 
sur le marché. 


Professions libérales, Laboratoires, Cen- 

tres de Recherche, Organismes de Forma- 

tion, etc., investissez clairvoyant. Voyez le 

système complet et homogène Commodore 

CBM 4001. 

Avec 

- son unité centrale de 32 Ko (CBM 4032), 

- son unité de double minidisquette de 
360 Ko (CBM 4040), 

- son imprimante à traction (CBM 4022), 


le système CBM 4001 et ses logiciels stan- 
dard disponibles, vous offrent de nombreuses 
possibilités pour résoudre vos problèmes. 


NB : Une unité centrale de 16 Ko 
(CBM 4016) est également disponible. 


PME/PMI, services décentralisés ou auto- 
nomes des Grandes Entreprises, investis- 
sez dans le haut de gamme. Voyez le sys- 
tème complet et homogène Commodore 
CBM 8001. 

Vous disposerez d’un équipement qui, asso- 
cié aux logiciels de haut niveau proposés par 
Procep, vous apportera une gestion efficace 
et vous donnera les meilleures chances de 
rester compétitif. 





Dans le cadre de sa politique d’apport de 
plus-value par la francisation, Procep équipe 
gratuitement les CBM 8001 d’une ROM 
supplémentaire : Edex 4.0, qui complète le 
Basic d’origine de l’unité centrale. 


Bientôt 2 nouveautés viendront enrichir la 

série CBM 8000 : 

- une unité centrale (CBM 8096) mettra à 
votre disposition 96 Ko RAM, 

- une nouvelle unité centrale vous donnera 
accès, en plus des langages actuellement 
disponibles (Basic, Comal, Pascal, Pilot, 
Lisp, Forth), à de nouveaux langages tels 
que APL, Cobol, Fortran, etc. 





Avec Master, les ‘‘développeurs’’ de logi- 

ciels vont être comblés. 

Master est un ensemble d’utilitaires qui 

vous permet : 

- de réaliser sur le système CBM 8001 des 
développements et des mises au point de 
programmes qui ne pouvaient l’être jusqu’à 
présent que sur des ‘‘gros ordinateurs””, 

- de protéger les logiciels ainsi développés 
contre d'éventuelles copies. 


Ainsi Master, non seulement vous facilite la 
vie, mais protège votre investissement 
‘matière grise”. 


Master comprend : 

- Master file (séquentiel indexé), 

- Master screen (générateur d’écran), 

- Master plus (extension Basic, multipréci- 
sion, compactage et décompactage, etc.), 

- Master print (générateur d’édition). 


Destinée aux unités centrales de la série 
CBM 3000, Edex 2.0 est une ROM supplé- 
mentaire venant compléter le Basic d’origine. 
Commandes et fonctions complémentaires 
apportées par Edex 2.0 : Auto, Renu, Delete, 
Apend, Dump, Error, Find, Call, Ifthen else, 
Print using, Plot, Reset, Beep. 


E Pro isriureu EGUSI POUR LA RANCE DE OMMODOR 


PEENDE LA MICRO-INFORMATIQUE 






Imprimante à traction CBM 8024 
132 colonnes, 160 c/s bidirectionnelle 


Edex 4.0 est une ROM venant compléter le 
Basic d’origine de l’unité centrale CBM 8032. 
Commandes et fonctions complémentaires 
apportées par Edex 4.0 - particulièrement 
utiles pour améliorer ou optimiser les logi- 
ciels de haut niveau développés sur le sys- 
tème CBM 8001 - : Auto, Renu, Delete, 
Merge, Dump, Error, Find. Fetch, Call, If 
then else, Print using, Plot, Reset, Hard 
copy, Beep. 

De plus, un exécuteur pas à pas facilite la 
mise au point des programmes 


Résidant sur ROM, Triex vous offre les pos- 
sibilités des ‘‘grands’” systèmes en matière 
de tri et de gestion de fichiers 


Résidant sur ROM, Multex vous permet de 
connecter un même périphérique à plusieurs 
unités centrales CBM 8032. 

Par exemple, plusieurs CBM 8032 répartis 


dans différents services peuvent travailler sur 
un même fichier se trouvant sur la même 
disquette ou imprimer sur la même impri- 
mante. 

Avec Multex vous gagnez de la place et vous 
faites des économies importantes. 














SYSTE 


Unité centrale CBM 8032 
32K octets RAM, écran 80 colonnes 


ME CBM 8001 


Unité de double disquette CBM 8050 
capacité 2 x 500K octets 
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Procep a su investir, dès sa création, dans 


la ‘‘francisation'’ des micro-ordinateurs 

Commodore en leur apportant une valeur 

ajoutée particulièrement importante au 

niveau des services offerts aux utilisateurs. 

- information : documentation, manuels et 
bulletin des utilisateurs de la gamme Com- 
modore, 

- formation : séminaires et cours destinés 
aux utilisateurs, revendeurs et distributeurs 
ainsi que des sessions spéciales pour l’en- 
seignement, 

- développement : logiciels de base, utili- 
taires, logiciels d’application de haut 


niveau pour la gestion et la bureautique. 
cartes industrielles, interfaces, etc... 

- garantie portée à un an, au lieu des 3 mois 
offerts par le constructeur. 





Le logiciel de comptabilité générale fonction- 
nant sur CBM 8001 a été conçu et longue- 
ment testé par une équipe de professionnels 
expérimentés en comptabilité et en informa- 
tique. Simple d'emploi, il permet aux 
PME/PMI de résoudre efficacement leurs 
problèmes comptables. 


Outre le calcul et l'établissement des bulle- 
tins de paie, le logiciel de paie permet la 
définition et l’actualisation en mode conver- 
sationnel du fichier du personnel et du plan de 
paie de l’entreprise et des salariés. 

Après mise à jour automatique, vous pouvez 
demander au logiciel l’édition instantanée ou 
différée des éléments propres à la paie d’une 
période donnée, ainsi que des informations 
nécessaires aux documents fiscaux, adminis- 
tratifs et comptables. 


Tout en conservant la potentialité des capa- 
cités de l’ordinateur pour traiter les pro- 
blèmes de gestion, les systèmes CBM de 
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Commodore apportent avec le logiciel de 
haut niveau Traitext, des solutions ‘‘trai- 
tement de texte’”” particulièrement efficaces 
et à des prix ‘‘micro-informatique”’. 


Bien entendu, le logiciel Traitext est entière- 
ment francisé et le clavier standard du CBM 
8001 a été modifié de façon à le rendre 
similaire à celui auquel sont habituées les 
secrétaires le clavier AZERTY avec 
voyelles accentuées. 








De façon à apporter la solution traîtemest 

texte qui correspond à vos besoins. Ps» 

vous propose 3 formules originales : 

- configuration spécialisée avec impr 
à marguerite, 


- configuration double pour la gestion 
traitement de texte, avec imprime. 
aiguilles et imprimante à marguenite, 


- configuration mixte avec imprime = 
aiguilles. 


L’imprimante à marguerite CBM 8022 gess 
être remplacée par l’imprimante CBM S02s 
Elle présente l’avantage d’être équipée @== 
clavier et en conséquence, de pouvoir == 
utilisée comme une machine à écnæe 
bureau. 


Dès à présent, Traitext fait le lien avec Æ 
logiciel de calcul Visicalc. Dans un practe 
avenir, une liaison avec logiciels de gestes 
de fichiers sera disponible. 


Une nouvelle race 
de logiciels. 


Avec Ozz et Visicalc, une nouvelle race de 
logiciels est née. Des logiciels capables 
d'apporter aux utilisateurs, même non infor- 
maticiens, la faculté d’écrire des programmes 
d'application, en ayant seulement à entrer les 
paramètres de travail au cours d’un dialogue 
homme-machine. 


: pour écrire des programmes sur 
mesure afin d'apporter votre solution infor- 
matisée à vos problèmes de gestion courants. 
Avec Ozz, il est maintenant possible d’infor- 
matiser, sans se créer de complications sup- 
plémentaires, de nombreuses applications en 
définissant seulement les paramètres de tra- 
vail. Nul besoin d’être informaticien pour 
mettre en œuvre le logiciel Ozz. 

Ozz comporte une gestion automatique de 





fichiers permettant de réaliser des sélectioss 
très élaborées d’enregistrements, quel = 
soit le nombre de critères choisis. 

: un puissant outil de planifses- 
tion et de prévision. 
Visicalc est en quelque sorte un bloe-se…= 
électronique dont chaque feuille se présess 
comme une grille composée de rangées 
colonnes. Chaque case peut être adresse 
comme une coordonnée : elle contiendra = 
label ou une valeur. Il vous suffit de modsfses 
un paramètre et tous les résultats sont moës- 
fiés en conséquence. C’est l’outil idéal pos 
établir des budgets, modifier des prévisions. 
et réaliser toutes sortes d'analyses financières 
ainsi que des calculs techniques et scients- 
fiques. 


CE COMMODORE LEADER EUROPEEN DE LA MICRO-INFORMATIQUE | 
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Procep renforce régulièrement son réseau de distributeurs 
et de revendeurs auxquels il apporte le maximum d’assistance. 
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pour vous accueillir quel que 
soit le but de votre visite. 


Pour les fanas de la micro- 
informatique comme pour 
- les débutants : 

SICOB-BOUTIQUE 
(stands n° 124. 126 et 128). 

Pour les spécialistes 

1 du domaine industriel : 

SICOB O.E.M. 
(stands n° 157 et 159). 


Pour les chefs d'entreprise. 
les cadres et les gestionnaires : 
SICOB PALAIS du CNIT 
(niveau 3 - stand 3 C 3308) 


19-21, rue Mathurin-Régnier 
75015 Paris 
Tél. : 306.82.02 
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Des livres pour votre CBM 


















< La découverte du Programmer en PASCAL p | 
PET/CBM par Daniel-Jean David 
par Daniel-Jean David et Jean-Luc Deschamps 
Cet ouvrage d'initiation à Ce livre contient un grand nombre 
l'utilisation de la gamme PET/CBM de programmes-exemples et 
comprend, essentiellement, une d'exercices résolus. Les déclarations 
introduction progressive au Pascal concernant les types de 
langage Basic. La découverte du données sont traitées avec 
langage est conduite en bâtissant précision et les notions générales 
des programmes de plus en plus sur les structures de données 
élaborés, au fur et à mesure de sont exposées. 
l'introduction de notions nouvelles. Série rouge 
Série verte, 160 Pages - 75 FF 






136 Pages - 65 FF 
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La pratique du PET/CBM > 
(Volume |) 
par Daniel-Jean David 


Cet ouvrage, qui suppose une 
bonne connaissance du Basic 

et des commandes du PET/CBM, 
ouvre les portes des applications 
faisant appel aux fichiers (cassettes, 
disquettes) à l'impression et au 
bus IEEE. Il comporte également 
de nombreux exemples et 
exercices avec solution. 


Série bleue 
Pages -65FF 


os 















| € Programmer en BASIC 
: par Michel Plouin 


Ce livre a été écrit pour les 
utilisateurs d'ordinateurs 
individuels en particulier d'Apple Il, 
TRS-80 et PET/CBM. 

Un répertoire Basic rend son 
utilisation très pratique et facilite 
la transposition d'un programme 
écrit pour un PS.I. sur un autre. 


Série verte 
132 Pages - 65 FF 
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< La pratique du PET/CBM Jeux, trucs et comptes 










(Volume ||) par Michel Benelfoul 
par Daniel-Jean David Ce livre est destiné à l'amateur 
Ce volume est une initiation à la de programmation débutant, 
programmation en langage désorienté par une mémoire 
machine 6502, dont le jeu vierge de toute instruction. 
d'instruction est expliqué Il y trouvera 29 programmes 






utilisant un maximum 
de fonctions du PET/CBM 
et abordant des domaines 
très variés, des jeux 







et utilisé. L'assembleur 
symbolique, l'éditeur 
et le chargeur y sont 
décrits. L'interaction 













avec le Basic et à la paie et à la 

avec le système facturation. 

y sont étudiés. Série verte 

th rouge 160 pacs 
76 pages 
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Envoyer ce bon accompagné de votre règlement à ÉDITIONS DU PS.I. Les prix sont : taxes, emballage et port compris 
41-51, rue Jacquard BP 86 {envoi par avion + 5 FF par ouvrage). 
77200 Lagny sMarne Tél. (6) 007.59.31. 
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Cette année a été fertile en évolution dans la 
gamme des ordinateurs Commodore: Le CBM 8032 s'est af- 
firmé. Les 4016 et 4032 sont venus remplacer les 3016 et 
3032, en leur apportant les avantages du BASIC 4.0. L'u- 
nité de disques AO4O est venue remplacer la 3040, appor- 
tant la possibilité de fichiers relatifs. L'imprimante 
4022 remplace la 3022, pendant que, dans la série 8000, 
les 8026 et 8027 viennent à coté des 8024 apporter la 
qualité d'impression "courrier". Nous apprenions ensuite 
l'imminente disparition du bon vieux P.E.T.2001 et l'ar- 
rivée du VIC destiné à prendre le marché bas de gamme. 


Comme le SICOB 81 doit être le cadre d'annonces 

- ou de début de commercialisation - importantes, nous 
pensons qu' il est utile de faire le point, d'autant que 
courent certains bruits sur des incompatibilités, des 
différences etc... Ces bruits n'ont pour cause que 
l'ignorance de ceux qui les font courir et nous pensons 
qu'il est essentiel de les dissiper. Vous n'avez aucune 
inquiétude à avoir: la gamme Commodore est une des plus 
étendues du marché, et en même temps une des plus compa- 
tibles. 


Revenons un instant à l'état du dernier SICOB. La 
gamme est formée du P.E.T. 2001, du système 3001: 3032 
(25 lignes de 40 caractères chacune, clavier profession- 
nel), 3040 (double disquette 340 Ko), imprimante 3022 (80 
col., 60 car./s) et du système 8001: 8032 (25 lignes x 80 
caractères, clavier encore plus semblable à celui d'une 
machine à écrire, BASIC 4.0), 8050 (double disquette 


A. nT 


TA 


1 Mo), imprimante 8024 (132 colonnes, 170 car./s). A côté 
du 3032, on trouve les tailles mémoire réduites 3008 et 
3016. 


I1 y a différentes compatibilités le long de la 
gamme: par exemple, sauf pour ceux qui ont été livrés 
dans les premiers, le P.E.T. 2001 est en effet un 3008: 
il a la même carte et les mêmes mémoires mortes; on peut 
lui connecter des disques. IL y a ensuite une compatibi- 
lité de connexion sur le bus IEEE qui vous permet de con- 
necter un périphérique 8000 sur une unité centrale 3000 
et vice-versa: vous pouvez connecter une 8024 ou une 8050 
sur un 3032, une 3040 sur un 8032. Vous pouvez connecter 
plusieurs unités de disques sur la même unité centrale, 
et elles peuvent être différentes (une 8050 + une 3040 
par exemple). 


Au point de vue logiciel, il y a quelques diffé- 
rences entre périphériques homologues. Par exemple l'im- 
primante 8024 n'a que les adresses secondaires 0,1,2 et 
3: elle n'a pas les possibilités graphiques de la 3022 ce 
qui est normal pour une imprimante utilisée plutôt en 
gestion. 


Du côté des disques les différences sont plus 
grandes: il n'y a pas compatibilité physique en ce sens 
que, vu que la densité des pistes n'est pas la même, une 
disquette créée sur 3040 n'est pas lisible sur 8050 et 
réciproquement. Si vous passez de 3040 à 8050, il faut 
pendant un temps avoir les deux unités connectées et 
copier vos fichiers de l'une à l'autre (au contraire des 
copies d'une platine à l'autre dans une même unité, cette 
copie passe par l'unité centrale). En revanche, et c'est 
très important, toutes les commandes de la 3040 sont 
reconnues par la 8050 et, par suite , vos programmes de 
fichiers qui tournaient sur 3040 doivent tourner sur 
8050, et inversement. Les seules adaptations nécessaires 
concerneront des accès explicites à des numéros de piste 
et secteur: la piste du catalogue et le nombre de sec- 
teurs par piste sont différents. Il sont résumés dans le 
tableau 1 à la fin de cet article. 


Une autre différence au niveau des disques, et qui 
est en correspondance avec des différences au niveau du 
BASIC est que: 


1) La 8050 admet des commandes supplémentaires par 
rapport à la 3040; les plus importantes étant: 


a) l'initialisation automatique 


b) l'ajout à la fin des fichiers séquentiels 
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et surtout c) l'accès relatif. 


2)Par rapport au BASIC du 3032 (BASIC 2:0,"1100n7% 2 
pas eu de BASIC 3.0 diffusé), le BASIC 4.0 introduit deux 
changements. 


a)Une amélioration spectaculaire de la routine 
de "garbage collection" (compactage des chaînes de carac- 
tères qui ne sont plus utilisées), et surtout 


b) de nouvelles commandes disque, comme DIREC- 
TORY, HEADER, COPY etc... et la variable réservée d'état 
disque DS et DS$f. 


Ces commandes évitent d'ouvrir le canal 15. et 
d'envoyer une chaîne de commande: ainsi COPY "ZOZO",D1 TO 
"Z0Z0",D0 est équivalent à 


OPEN:15,8,15:PRINI#15,"CO:Z0Z0=7:Z07Z0" 


Mais l'ancienne méthode marche toujours, c'est 
pourquoi vos anciens programmes de 3000 doivent tourner 
sur votre 8000. 


De fait, lorsque BASIC 4.0 rencontre un nouvel or- 
dre disque, il le transforme en la chaîne de caractères 
correspondante. Il est de même pour les ordres BASIC 4.0 
qui font appel aux nouvelles possibilités comme l'accès 
relatif. Ainsi à RECORD correspond PRINT#15,"P..." 

Par suite, si vous connectez une 8050 à un 3032, 
vous pourrez exploiter ses nouvelles possibilités même en 
BASIC 2.0. Beaucoup d'utilisateurs ne le savent pas. 


Ces points étant clarifiés, passons à la nouvelle 
gamme. 


KKKRKKEXE EX XX EE XX X 


* LA SERIE 4000 #* 
HORMONE NX NX 


Cette série vient remplacer la série 3000-20 "1: 
veau unité centrale (4016 et 4032), unité de disques 
(4040) et imprimante (4022). 


L'imprimante 4022 e 
dont elle a toutes les possibi 

condaires supplémentaires. Elle est plus silencieuse, 
plus compacte et a une meilleure qualité d'inpression. 
Sinon, il y a parfaite compatibilite. 


t une EPSON comme “1a 3022, 
_ 


s 
b tés, avec 3 adresses se- 


1 
e 
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Au niveau unité centrale, le HOxx est un 30xx avec 
de nouvelles MEM qui fournissent BASIC 4.0. L'écran est 
en O0 colonnes. La carte interne est la même. Ce sont les 
boîtiers MEM qui sont changés. Noter qu'il y en a un de 
plus: de BO0O00 à BFFF. Il y a donc un emplacement libre en 
moins. Vous pouvez transformer un 3000 en 4000 par chan- 
gement des MEM. On obtient une machine intermédiaire en- 
tre le 3000 et le 8000: on a BASIC 4.0, mais les nouvel- 
les possibilités d'édition du 8000 dues à son nouveau 
clavier et à l'écran 80 colonnes sont absentes. 

Noter qu'il doit apparaître un nouveau modèle de 
4000 avec écran de la même taille qu'un 8000 mais tou- 
jours 4O colonnes par ligne: les caractères seront donc 
plus gros et lisibles de loin (intéressant dans une clas- 
se). Noter aussi que le 4008 n'est pas diffusé en France: 
il ne serait pas beaucoup moins cher que le 4016. 


Au point de vue compatibilité, les programmes 
purement BASIC doivent pouvoir passer tels quels sur 
3000, 4000 et 8000 (à condition de ne pas avoir la va- 
riable DS ou DS$ ce qui est très rare). 


Ceux qui font appel à des routines langage machine 
situées dans les MEM BASIC doivent être adaptés car tou- 
tes les adresses MEM système sont changées (à cause des À 
K supplémentaires ). En revanche, les adresses stratégi- 
ques de la page zéro sont très peu changées au passage 
3000/4000/8000. On rappelle que lors du passage ancien 
2001/nouveau 2001-3000, la page zéro avait été complé- 
tement bouleversée et les adresses BASIC avaient été 
légèrement changées. 


Du coté disque, on peut dire que la 4O0O4O est une 
8050 qui a en gros la capacité de la 3040. Le SED est 
celui de la 8050: il fait 16K, a en partie l'autoinitia- 
lisation et il permet les fichiers en accès relatif (nous 
consacrerons un article complet à l'accès relatif dans un 
prochain numéro). À cause d'un formattage différent, la 
capacité est un peu inférieure à la 3040. 


Point qui mérite d'être clarifié: une disquette 
3040 peut être lue sur une 4040; une disquette 4O4O peut 
être lue sur une 3040. En revanche, une disquette forma- 
tée et commencée à être écrite sur une unité ne peut pas 
être écrite sur l'autre. Dans le sens 3040 vers 4O4O, la 
H04O émet un diagnostic. Dans le sens 4O0OHO vers 3040 
c'est plus insidieux: la 3040 corrompt la disquette qui 
ne pourra plus être lue. La marche à suivre pour utiliser 
vos anciennes disquettes 3040 sur votre nouvelle 4O4O est 
la suivante: vous formatez une disquette neuve sur votre 
HOUO, puis vous copiez tous les fichiers de l'ancienne 
disquette par COPY DO TO D1. Il faut que votre disquette 
ne soit pas totalement pleine puisque la OO a une capa- 
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cité légèrement diminuée. 


Tableau 1 - Pistes et secteurs sur. 3040/4040/8050 


RRRHUNOHONOMONOUNONONDEEUNONDONONNONONOMOUNNNOHOXONONONONOKONONONONDN EX NONNONONONOO NE DE XX 
* modèle * 3040 >: 4040 ” 8050 L3 
* * * * * 
RRRUURUOUMOUOMONOMO UE ONOHOHONONONONOMONUNRNDONONONONONONONDEDN NN ONK NON NX X 


#*catalogue* piste 18 * piste 18 “piste. 39 sect 0 et 1* 


* et BAM * secteur 0 *sect 0 et 1* P 38 sect 0 à 3 * 
* * * * * 


KRREKRREREEEREEEERERERERÉEREEEEXEXHX EX EX EXÉ XXE EX HE XXE XX XX XX 
#* piste # sect. (nb) #* sect (nb) *# piste . sect. (nb) * 


# 1-17 * 0-20 21 * 0-20 21 * 1-39 : 0-28 2% 
#* 18-24 # 0-19 20 # 0-18 19 * 40-53 . 0-26 ÊT.  * 
#* 25-30 * 0-17 18 * 0-17 18 * 54-64 . 0-24 25 * 
* 31-35 * 0-16 it «FE 0at6 17 4 65277 022? 53. * 
* * * * * 
* * 


En résumé, il y a sur la gamme une compatibilité 
assez complète et le passage 3000/4000 devrait se faire 
en douceur. Notons que l'EDEX 4000 ne devrait pas tarder 
à apparaître. 


Voyons maintenant les nouveautés du SICOB 81. 


XKHKX EE XX X 


* LE VIC * 
KKKKKKEEXX 


Le PET 2001 est en train de disparaître. Le bas de 
la gamme Commodore sera maintenant constitué par le VIC 
qui est un boîtier contenant un clavier professionnel et 
qui se connecte à un téléviseur couleur. Voyez l'article 
qui lui est consacré dans ce numéro. Il faut noter que le 
VIC s'intègre bien à la famille Commodore: on peut lui 
adjoindre une interface IEEE (disponible prochainement) 
qui permettra la connexion des périphériques de la gamme. 
Les adresses des routines système sont changées ainsi que 
les adresses page zéro, mais on retrouve les mêmes con- 
cepts et les mêmes techniques. Donc, là aussi, compatibi- 
lité. 
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KKXX XX XX XX X 


* LE 8096 * 


KKKKKKXEXE XX 


Il s'agit tout simplement d'un 8032 auquel on 
ajoute une carte de 64 K de mémoire vive. Bien sûr, toute 
la mémoire n'est pas accessible au même moment: la MEV 
est organisée en blocs de 16 K: seuls deux blocs sont ac- 
cessibles à un instant donné. C'est géré par un registre 
qui indique par un bit 1 quels blocs sont actifs. Le dis- 
positif peut se rajouter à un 8032 acheté précédemment. 
I1 y a parfaite compatibilité logicielle puisqu'un des 
états est celui où les 32 K habituels sont actifs. 


KXKKKEEE EX XX XX KE XX XX 


* MICRO-MAINFRAME * 
AN HMONNONONDXN  X 


Le haut de la gamme est formé par le ÆCBM 9000 
MICRO-MAINFRAME. Il résulte d'une opération très intel- 
ligente. Les gens de l'université de Waterloo avaient 
conçu un système très perfectionné (très riche en inter- 
préteurs de différents langages) à base de 6809. Ils 
avaient besoin d'un clavier-écran-disque bon marché: un 
CBM 8032 / 8050 le fournit. 


Le Micromainframe est en fait un 8032 + 8050 ayant 
une carte 6809 / 64 K MEV à l'intérieur. Un interpréteur 
permet de choisir entre le mode 6502 où l'on dispose du 
Basic du CBM, de l'assembleur 6502, de Pascal Transam, de 
Comal, Forth, Lisp...et le mode 6809 où l'on dispose du 
Basic Waterloo qui est plus performant que le Microsoft, 
de Fortran, d'APL, d'un Pascal étendu et où on aura bien- 
tot Cobol. C'est l'outil idéal en enseignement où l'on 
veut enseigner le plus possible de langages différents. 


Bien sûr, nous vous en dirons plus dès que nous 
aurons pu évaluer le produit. 


KKKKEKEKEXX XX XX X X 


* IMPRIMANTES * 
NEO OX XX X 


Terminons en signalant que, dans la série 8000, la 
8024 est maintenant épaulée par deux imprimantes à mar- 
guerite la 8026 (qui a un clavier) et la 8027 qui procure 
la qualité "courrier" à un prix très modique. Ces impri- 
mantes sont prévues pour utilisation avec la version 
française du système de traitement de textes avec le cla- 
vier AZERTY accentué en option sur le 8032. 


Daniel-Jean DAVID 


ETAT. 2T 





KKKKKXXXEX XX XX XX XX XX XX X 


* % 
* VISITE AU PET SHOW * 
# * 


KKKX XX XXE XX XX XX À À € À À X À X 


Tous les ans, vers la fin juin, à Londres, se tient 
le PET show. De quoi s'agit-i1? Tout simplement d'une ex- 
position qui a l'importance de la SICOB Boutique ou - à 
peu près- de la MICROEXPO, mais qui est entièrement con- 
sacrée au PET / CBM et aux produits compatibles. Ceci est 
une preuve de la domination qu'exercent les produits Com- 
modore sur le marché d'Outre-Manche. 


Nous avons eu le privilège de visiter l'exposition 
cette année qui est particulièrement riche en annonces 
Commodore. Nous tenons à faire part de nos impressions à 
nos lecteurs, en avant-première des produits qui seront 
présentés au SICOB. 


Nous avons d'abord été frappé par la fréquentation: 
nous avons visité le PET show le dernier jour, un samedi, 
par un très beau temps. Eh bien, la foule se pressait aux 
stands et, alors qué la fermeture était prévue pour 17 
heures, des affaires se concluaient encore dans la fièvre 
à 18 heures! 


Ensuite, nous avons remarqué le professionnalisme 
et le sérieux des produits présentés. IL y avait peu de 
gadgets, par exemple un stylo lumineux (light-pen: nous 
vous apprendrons comment en bricoler un dans le prochain 
numéro). Sinon,les matériels et les logiciels présentés 
étaient spectaculaires et nous espérons que beaucoup 
viendront en France. 


Au point de vue matériel, nous avons particulière- 
ment remarqué: 


-plusieurs cartes haute résolution 
-plusieurs interfaces RS232 accompagnées du logiciel 
permettant de transformer le CBM en terminal performant. 


-les programmes de gestion sont inutilisables en France 
à cause des différences de législation. Toutefois, 
certains des logiciels présentés étaient remarquables. 


-Un système nous a semblé très spectaculaire, c'est le 
Silicon Office de Bristol Software. Il intègre sur un CBM 
8096 les fonctions de mailling, paie, gestion de base de 
données comme 0ZZ, VisiCalc, traitement de texte etc... 
Comme son nom l'indique, un véritable bureau en silicium! 
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Le stand Commodore occupait une surface importante. 
Il présentait beaucoup de nouveautés: 


-le VIC, bien sûr. Tous les VIC exposés étaient occupés 
par des jeunes en train de jouer. J'ai pu apercevoir l'u- 
nité monodisquette destinée au VIC ainsi que son magnéto- 
phone: il est comme celui que vous connaissez pour le 
CBM, à part qu'il est blanc... et qu'il a un compteur! 


-le 8096. Etant donné ce qu'on peut faire avec un CBM 
8032, que ne fera-t'on avec 64 K de MEV en plus? 


-le CBM 9000 MICRO-MAINFRAME, formidable produit pour 
l'éducation vu le nombre de langages de programmation 
qu'il possède sur ses deux microprocesseurs: BASIC, As- 
sembleur, PASCAL, LISP, .FORTH, FORTRAN, APL et bientôt 
COBOL. 


Une bonne partie du stand était réservée à la dé- 
monstration de logiciels pour l'enseignement. Cela nous a 
permis d'essayer le MTC-PILOT qui est un langage d'écri- 
ture de dialogues machine-élève pour les professeurs non 
informaticiens. 

Une évaluation détaillée en sera donnée dans un 
prochain numéro de La Commode. 


Enfin, pour la première fois, PROCEP avait un stand 
important pour préparer l'exportation des produits fran- 
çais les plus remarquables développés sur CBM. Citons: 


-EDEX dans ses différentes versions 3000 et 8000. Vous 
savez tous qu'EDEX est une MEM qui permet d'ajouter à BA- 
SIC des commandes ou instructions comme IF THEN ELSE, 
PRINTUSING, APPEND/MERGE ou l'exécution pas à pas. 


-MULTEX, un logiciel de gestion de l'IEEE qui permet de 
relier plusieurs CBM à une même unité de disques et ainsi 
interroger une base de données à partir de plusieurs pos- 
tes. 


-MASTER, un logiciel d'acquisition de données sur écran 
avec gestion de masques à l'aide d'instructions ajoutées 
au BASIC. 


Bien entendu, tous ces produits seront évalués en 
détail dans La Commode. 


En conclusion, une exposition à ne pas manquer, en 
attendant qu'il y ait un PET show francais. 


Daniel-Jean DAVID 
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# x 
* PREMIER CONTACT #* 
* # 
S AVEC LE s 
# # 
5 VIC * 
x * 
CRE 


Le VIC a été le clou de la dernière NCC à Chicago. 
Il est vrai qu'offrir tant de puissance de calcul et la 
couleur pour 2500 F tient du prodige. 


Nous offrons ici nos premières impressions. Nous pu- 
blierons bien sûr d'autres études plus approfondies à me- 
sure que nous connaîtrons mieux le produit. 


Le VIC est destiné à remplacer le P.E.T. vers le bas 
de gamme. Or ce sont les anciens utilisateurs du P.E.T. 
qui seront surpris avec le VIC: en effet, le caractère 
monolithique du P.E.T. est abandonné. Le VIC est un boîi- 
tier-clavier/unité centrale qui se connecte à un télévi- 
seur extérieur. Il y a même un chassé-croisé avec TANDY 
dont le modèle I -en éléments séparés- s'opposait au 
P.E.T. monolithique, alors que maintenant, c'est le TANDY 
modèle III qui est en un seul coffret alors que le VIC 
est en éléments séparés. Il faut toutefois noter que le 
VIC offre la couleur: il est donc plus normal que le té- 
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léviseur soit séparé (et non compris dans le prix; il en 
est de même pour le TANDY Color Computer). 


Cette première surprise passée, on se retrouve en 
pays de connaissance: le VIC a EXACTEMENT le même BASIC 
que le P.E.T. ou le CBM, les mêmes ordres, les mêmes 
fonctions. Un programme BASIC de P.E.T. doit tourner sur 
lé‘ VIC. 


Les seules différences sont les suivantes: 


1-la carte d'implantation mémoire est changée, donc 
les programmes à POKE astucieux doivent être adaptés. 


2-l'affichage fait 23 lignes de 22 caractères; donc 
certaines instructions d'impression doivent être modi- 
fiées. 


3-pour profiter des possibilités supplémentaires en ce 
qui concerne la couleur et les effets sonores, tout se 
passe par POKE à certaines adresses. 


L'affichage sur 22 caractères donne un aspect cu- 
rieux aux listings des programmes. Une ligne BASIC équi- 


vaut à 4 lignes d'affichage et BASIC admet des lignes de 
88 caractères (au lieu des 80 du CBM). 


KKXKXX XX XX XX X XX X 


# LE CLAVIER * 
RME NN XX 


L'organisation du clavier est montrée par la figure 
ci-dessous. 


TT EE 
le LE 
FE D EU ET 
EE TEE) La 
ÊEsbisslealenloslas 



















Il faut noter que ce clavier est de qualité profes- 
sionnelle parfaite, tant pour la taille des touches que 
le toucher. On retrouve la plupart des touches du CBM, à 


set sf 


l'emplacement près. Les touches lettres ont 4 valeurs: 
lettre majuscule, lettre minuscule, et les deux graphi- 
ques sur l'avant. 


À la mise sous tension, on est en mode graphique: 
l'appui sur la touche seule donne la lettre majuscule; 
SHIFT et la touche donne le graphique de droite; on ob- 
tient le graphique de gauche en tapant simultanément sur 
la touche considérée et la touche qui représente le sym- 
bole Commodore =. On passe du mode graphique au mode 
texte et vice-versa en appuyant simultanément sur SHIFT 
et Commodore. En mode texte, SHIFT donne la lettre mi- 
nuscule, Commodore donne toujours le graphique de gauche. 


La touche CTRL (Contrôle) fournit des caractères de 
contrôle, notamment avec les touches couleurs: après 
avoir fait CTRL "bleu" tous les caractères tapés viennent 
en bleu (il ne faut pas que le fond soit bleu si vous 
voulez les voir!). Les touches RUN/STOP, RVS ON et OFF 
(qui s'obtiennent avec CTRL), CLR/HOME, INST/DEL et cur- 
seur jouent exactement le même rôle que sur un P.E.T. Les 
possibilités d'édition sur écran qui étaient un avantage 
décisif sur le P.E.T. sont intégralement conservées. De 
même que les touches curseur sont programmables dans une 
chaîne de caractères, les combinaisons de changement de 
couleur le sont. 


RESTORE rétablit le VIC dans son état de mise sous 
tension, mais le programme est conservé en mémoire: c'est 
un reset tiède. Enfin, il y a deux fois (avec SHIFT) qua- 
tre touches dont le rôle est programmable par l'utilisa- 
teur à la droite du clavier. 

Notons que, sur le VIC, si à INPUT A on répond par 
RETURN tout court, alors on ne sort pas du programme 
comme avec le P.E.T.: la variable A garde son ancienne 
valeur. 


KKKKKEX XX XX XX X 


* INTERFACES #* 
RHONE X 


Le VIC comporte de nombreux connecteurs vers l'exté- 
rieur. 


1- Le connecteur vers la télévision fera l'objet de la 
section suivante. 


2- Il y a un connecteur magnétophoné identique à celui 
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du P4E.T. Une cassette de P.E.T. est lisible sur le VIC, 
ce qui est un bon facteur d'intégration du VIC au reste 
de la gamme. 


3- Un connecteur appelé connecteur de contrôle permet 
de relier des "manches à balais", 


}- Le connecteur IEEE est très particulier: en effet 
les signaux de l'IEEE sont transmis en série, et non en 
parallèle, sur le VIC. Donc le logiciel obéit aux mêmes 
principes que sur le P.E.T. et moyennant un interface 
prévue par Commodore pour reconstituer l'IEEE classique, 
tous les périphériques de la gamme CBM et les appareils 
d'instrumentation habituels seront connectables au VIC. 


5- Un connecteur d'extension-mémoire transmet les bus 
du microprocesseur. On peut y connecter des cartouches, 
dont la première disponible sera une extension de 3 K de 
MEV portant la MEV totale à 8 K. D'autres extensions de 
MEM ou de MEV sont prévues jusqu'à occuper tout l'espace 
adressable de 64 K. 


KKKKKKXKEXXÉEE XX EX EE EX XX XX XX XX XX XX 


* LE PROBLEME DE LA TELEVISION * 


KXKKKKEEX XX EX XX XX EEE EX KE KE KE XX XX 


Le VIC (Video Interface Computer) commande un télé- 
viseur couleur et aussi le haut-parleur de ce téléviseur 
(3 voies son + 1 voie de bruitage) grâce à un circuit in- 
tégré très évolué qui s'appelle aussi un VIC (Video In- 
terface Chip). Ce boîtier existe en deux versions : PAL et 
NTSC, donc aussi le microordinateur VIC. Au départ, c'est 
des VIC PAL qu'on aura en France. 


Cela pose un problème en France. Il faut 


ou bien 1) développer une interface PAL-SECAM qui peut 
être coûteuse; 


ou bien 2) acheter en même temps un téléviseur PAL ; 
on perd l'avantage du prix qu'on avait en 
utilisant le téléviseur domestique; 


i 
ou bien 3) se contenter d'un moniteur noir et blanc, 
mais on perd l'avantage des effets couleur; 


Nous pensons qu'en définitive la meilleure solution 


est 2. En effet, se connecter au téléviseur familial 
n'est pas une très bonne solution: l'activité microinfor- 
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matique prive le reste de la famille de la télévision. 
D'autre part le téléviseur familial a généralement un 
écran très grand, peu pratique à regarder de près pour 
visualiser des textes. De fait, l'expérience montre que, 
partout où on a connecté un microordinateur au téléviseur 
familial, il y a peu de temps après, achat d'un second 
téléviseur! 


Il nous semble donc tout-à-fait à conseiller d'ache- 
ter un téléviseur multistandard PAL/SECAM portatif, qu'on 
devrait pouvoir trouver pas trop cher et qui pourra ser- 
vir de téléviseur d'appoint pendant les vacances. 


KKKKREXX XX XX XX XX XX XX XX X X 


* IMPLANTATION MEMOIRE * 
HOME MMM NN À 


Si l'on retrouve les mêmes notations que sur le 
P.E.T ., les routines système sont déplacées et les a- 
dresses système de la page zéro ont été déplacées elles 
aussi. Notons qu'il n'y a pas de moniteur langage machi- 
ne. Celui-ci sera dans une extension MEM. 


Le premier K de mémoire est la MEV système de 0000 à 
$3FF. Le texte BASIC réside de $1000 (4096 en décimal) à 
è e 


$1DFF normalement, de $400 (1024) à $1DFF en présence d 
l'extension de 3 K MEV en cartouche. 


De $1E00 (7680) à $1FFF on trouve la MEV écran (512 
cases) pour les codes caractères. 


De $9600 (38400) à $9800, il y a une autre MEV écran 
pour le code couleur de chaque caractère. 


Le générateur de caractères est dans l'espace adres- 
sable, de $8000 (32768) à $8FFF. Le bloc $9000-$9FFF non 
consacré à la MEV couleur est consacré aux entrées-sor- 
ties. Le boîtier VIC est en $9000. De CO00 à FFFF on 
trouve la MEM système, avec l'interpréteur BASIC. Les au- 
tres zones sont libres pour des extensions MEV ou MEM de 
$2000 à $7FFF et de $AO00 à $BFFF. 


Nous donnons au verso quelques adresses de page O, 
1, 2 et 3 qui ont été repérées. Il y en aura d'autres 
dans nos prochains numéros: 


in 27 


BST 


mm mm mm mm mm mm mm 


ss 


.122-123/7A-7B 


.209-210/D1-D2 


.243-24H/F3-F4 


. 


1188-789/314-315 


43-4}/2B-2C 
L5-46/2D-2E 
L7-48/2F-30 
49-50/31-32 
55-56/37-38 
.97-102/61-66 


144/90 
158/9E 
198/C6 


204/CC 


211/D3 


214/D6 


6317277 
646/286 
649/289 


650/28A 


H0-41/28-29 
42-43/2A-2B 
H4-45/2C-2D 
H6-47/2E-2F 
Dana ESS 


94-99/5E-63 
:119-120/77- 78 


150/96 
192/C0 
158/9E 


167/A7 


:196-197/C4-C5 


198/C6 


216/D8 


.pas d'équiva- 
.lent 


623/26F 
/ 
/ 


/ 


.pon clavier .de 


début du texte BASIC 
début des variables 
début des tableaux 

fin des tableaux 

fin de la mémoire 

accu. flottant no 1 
pointeur vers le texte. 
BASIC dans la routine 
CHRGET 

variable ST 


.compteur d'erreur baride. 


pointeur dans le tam- 


.pon clavier 


0 = curseur clignote 
1 = ne clignote pas 
pointeur vers le début. 


.de la ligne écran ë 


numéro de la colonne 


.où est le curseur 


no de ligne du curseur. 
pointeur vers le code 
couleur du caractère 
courant. 

début tampon clavier 
couleur courante 
longueur max. du tam- . 
10 à 80. 


SA = 188, toutes les 


.touches ont la répéti- 
.tion 
144-145/90-91. 


vecteur d'interruption. 


é es .e » © 0 ‘= » 0/60 os 0e © s'e ve e ee ee 6 57e :6.0 0 01e 1e: see e 96.0) 6e 5070 015 5 à eve 6 


On voit que beaucoup d'adresses n'ont fait 


tre repoussées de 3 octets, 


à celui sur le PET/CBM. 
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mais leur rôle 


que d'ê- 
est identique 


Pierre-Etienne THALBERG 
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# # 
# LE C.B.M., UN ORDINATEUR POLYGLOTTE * 
* * 


KKHXHXEXE XX KE EE EX KE XX NE NX KO XX À XX XX XX XX X 





Bien que 90% des utilisations du CBM se fassent en 
BASIC, celui-ci permet maintenant quantité d'autres lan- 
gages tous utiles chacun dans son domaine d'applications. 


KRKKKKEXEX 


* BASEC * 
REX N XX 


BASIC reste le roi des langages pour microordina- 
teurs. Au départ, BASIC a été défini comme un sous-ensem- 
ble simplifié de FORTRAN qui était à l'époque le langage 
de programmation scientifique le plus répandu. Cette sim- 
plification avait pour but d'obtenir un langage plus fa- 
cile à apprendre quitte à accepter certaines limitations. 
De fait, le but a été parfaitement atteint: BASIC est le 
langage le plus facile à apprendre: il suffit de quelques 
heures passées devant votre ordinateur pour savoir BASIC. 


Maintenant, les limitations de BASIC, qu'on était 
prêt à accepter pour payer la simplicité, ne sont pas si 
importantes que cela. En fait,BASIC a été progressivement 
étendu, et le BASIC du CBM est un des plus étendus, sur- 
tout si l'on tient compteid'EDEX, de sorte qu'il est 
maintenant un langage évolué très puissant. Il est aussi 
puissant que FORTRAN, et même plus sous certains aspects. 
En particulier, BASIC est doté de facilités de traite- 
ments de chaînes de caractères à la fois puissantes et 
commodes d'emploi que tous les langages peuvent lui en- 
vier. Ces facilités autorisent, comme l'expérience le 


PE Créé Es 


ED 





montre, des traitements de gestion. Couplées à certaines 
caractéristiques des disques COMMODORE, on a le moyen de 
manipuler les noms de fichiers à l'intérieur des program- 
mes, ce que très peu de systèmes permettent. 


La seule faiblesse du langage Basic qui reste,est 
sa manière rudimentaire de traiter les sous-programmes: 
pas d'appel par un nom symbolique, pas de transmission 
d'arguments. 


Une autre caractéristique mise en avant pour BASIC 
est le caractère conversationnel de la mise au point des 
programmes. En fait, ce n'est pas une caractéristique du 
langage BASIC, mais de son utilisation à l'aide d'un in- 
terpréteur qui interprète chaque instruction une par une: 
donc, en cas d'erreur, l'instruction correspondante est 
facilement repérable. De plus, le programme est toujours 
en mémoire, on peut le corriger immédiatement. 

L'opération est encore facilitée par les possibi- 
lités d'édition du CBM. 


Avec un compilateur, au contraire, le programme 
est traduit en bloc en langage machine et ensuite seule- 
ment,le programme traduit est exécuté. Les erreurs sont 
plus difficiles à repérer et, pour faire une correction, 
il faut recharger le programme en mémoire, corriger, puis 
tout recompiler. En revanche, on y gagne en taille mémoi- 
re et surtout en vitesse d'exécution (des facteurs de 10 
à 20). 


Une erreur souvent commise est de dire que tel ou 
tel langage est meilleur parce qu'il est interprété ou 
compilé. Ce n'est pas une caractéristique du langage et 
donc, on ne doit pas en faire un critère de choix du lan- 
gage. Un même langage peut d'ailleurs posséder à la fois 
des interpréteurs et des compilateurs, c'est le cas de la 
plupart des langages et notamment de BASIC sur CBM: on 
dispose de l'interpréteur bien connu et ensuite, il exis- 
te un compilateur fait par DTL que nous analyserons dans 
un prochain numéro. Ceci représente la solution idéale: 
on met au point le programme avec l'interpréteur puis on 
compile. Les exécutions se feront à plus grande vitesse 
avec le programme compilé. 


KKXHXX XX XX XX K K X 


* ASSEMBLEUR * 
RENE EN X 


Si le compilateur, pourtant plus rapide que l'in- 
terpréteur,ne procure pas de performances suffisantes 
alors il faut avoir recours au langage machine du micro- 
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processeur. De très petits programmes peuvent être entrés 
dans la machine à l'aide du moniteur langage machine in- 
corporé en MEM. Si le programme est plus important, on ne 
peut se passer d'un assembleur symbolique, programme qui 
lit votre texte source sous forme mnémonique (avec ins- 
tructions et variables symboliques, exemple LDA TOTO ) et 
le traduit en langage binaire ou hexadécimal, un peu à la 
manière d'un compilateur. IL existe de nombreux assem- 
bleurs symboliques sur PET/CBM, de performances varia- 
bles, exigeant plus ou moins de mémoire et fonctionnant 
avec cassettes ou disquettes. Nous en présenterons pro- 
chainement une revue. 


Mais le CBM propose des langages autres que BASIC 
ou l'assembleur. Pourquoi vouloir un autre langage évolué 
que BASIC, puisqu'on a le choix entre trois niveaux de 
performance: BASIC interprété, BASIC compilé et l'assem- 
bleur ? C'est que BASIC à tout de même quelques faibles- 
ses: son mécanisme de sous-programmes est rudimentaire. 
De plus BASIC ne favorise pas la programmation structurée 
et même, il a les défauts de ses qualités: sa trop grande 
facilité d'emploi incite à se mettre directement à pro- 
grammer au clavier sans réfléchir d'avance à la concep- 
tion de son programme. 


KXXX XX XX XX 


* PASCAL * 
MEN XX EX 


C'est pourquoi on préconise l'emploi de langages 
structurés comme PASCAL qui est le deuxième langage der- 
rière BASIC dans l'ordre de fréquence d'emploi sur micro- 
ordinateurs. On peut dire que PASCAL est plus puissant 
que BASIC: 


-mécanisme d'appel de procédures perfectionné 

-programmation structurée 

-structures de blocs 

-=notions très évoluées comme la récursivité 

-les types de données définissables par l'utilisateur 
BEC sx 


Comme le montre l'article de J-L DESCHAMPS dans ce 
numéro, le PASCAL du CBM est perfectionné, agréable d'em- 
ploi et il ne rompt pas avec les habitudes système du 
CBM. En revanche,PASCAL n'est pas aussi simple que BASIC, 
pour les débutants, bien qu'il ait un grand succès en 
université pour les bonnes habitudes de programmation 
qu'il inculaque. 
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KKXKKXEXX XX 


*# COMAL * 
HN KE X 


Il vient d'apparaître un langage qui semble cumu- 
ler les avantages de BASIC et de PASCAL: c'est COMAL. 
COMAL est un intermédiaire entre BASIC et PASCAL. 


-On peut le considérer comme un surensemble de BASIC 
dont il conserve la simplicité et auquel il ajoute prin- 
cipalement des instructions de programmation structurée 
et un mécanisme de sous-programmes évolué. 


-On peut aussi le considérer comme un PASCAL sans la 
gestion des types. 


COMAL est présenté plus en détail dans ce numéro. 
I1 est possible qu'il suppplante BASIC. 


D'autre part, le CBM vous permet de vous exercer 
aussi sur deux langages plus marginaux, plus éloignés des 
autres langages. Ces langages sont moins algorithmiques 
et chacun est attaché à une structure particulière de 
données. Il s'agit de LISP et FORTH. 


KXKKKXX XX 


W DEEP * 
CELL I. 


LISP est un langage de traitement des listes. 
Beaucoup de problèmes, notamment d'intelligence artifi- 
cielle, sont traitables en LISP beaucoup plus facilement 
qu'avec d'autres langages. 


HXKXXEX XX 


# PORPH. 
XXE EX X 


FORTH est articulé autour d'une structure de pile. 
Les opérations doivent lui être fournies en notation 
polonaise. On peut inclure dans les traitements des pas- 
sages en assembleur symbolique (mais fournis en notation 
polonaise). Mais la caractéristique la plus importante de 
FORTH est qu'il est auto-extensible: l'utilisateur peut 
ajouter ses propres mots-clefs. Il suffit qu'il fournisse 
la définition du traitement correspondant; cette défini- 
tion peut inclure de l'assembleur.,. On voit la richesse 
des possibilités que cela ouvre. 
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KXXX XX XX X 


* (PÉLOT 
HR NN 





Enfin, on peut utiliser sur CBM le langage PILOT. 
Ce langage est ce que l'on appelle un langage auteur, 
c'est-à-dire un langage permettant à un enseignant non 
informaticien d'écrire des dialogues élève-machine. 


La version de MTC est efficace et nous en publi- 
erons prochainement un banc d'essai. 


RÉESTÉSESSEES 
$ CONCLUSION $ 


RÉSÉÉSÉELLELEE 


La liste des langages accessibles sur CBM est im- 
pressionante: BASIC interprété et compilé, assembleur, 
PASCAL, COMAL, LISP, FORTH, PILOT. Elle s'allonge encore 
sur le CBM 9000 Micro-Mainframe qui dispose en plus de 
FORTRAN, APL et COBOL (prochainement). 


Nous demandons aux lecteurs de nous envoyer leurs 
évaluations des différents langages,les particularités de 
chacun de ces langages qu'ils exploitent plus spéciale- 
ment dans leurs applications afin d'aider d'autres lec- 
teurs à mieux choisir le langage qui leur donnera le plus 
de satisfaction. 


Pierre Etienne THALBERG 
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KKKEKKREÉREREREREEEREEEKEKKKEKREEKEKXEXXX 


* # 
* COMAL, LE DERNIER-NE DES LANGAGES * 
*% * 


KXEXX XX EE XX HE EN XX NX KE XX XX À XX XX XX XX XX 


La plus grande nouveauté logicielle au SICOB 81 
sera certainement COMAL. Il s'agit d'un nouveau langage 
(COMmon Algorithmic Language) inventé au Danemark par 
Borge Christensen. Il se trouve que la première version 
en fonctionnement est pour le CBM 4000 ou 8000. Commodore 
met le langage dans le domaine public, donc il sera four- 
ni gratuitement (on ne paiera que la disquette). COMAL 
est fourni sous forme d'interpréteur qui occupe 28 K. 
Cela laisse assez de place sur un CBM 32 K car les pro- 
grammes peuvent être organisés en recouvrement. 


La caractéristique essentielle de COMAL est qu' 
il constitue en quelque sorte un intermédiaire entre BA- 
SIC et PASCAL. On peut dire que COMAL est un BASIC struc- 
turé, ou un PASCAL sans les types de données définis par 
l'utilisateur. 


COMAL est appele à une large audience dans l'en- 
seignement: en effet, comme PASCAL, il introduit les 
structures de la programmation structurée et il comble 
parfaitement la lacune essentielle de BASIC dans le do- 
maine des sous-programmes, mais il conserve la simplicité 
de BASIC et sa facilité d'emploi et d'apprentissage. 


La plupart des instructions et des fonctions de 
BASIC sont conservées. Les extensions SYS (appel d'un 
sous-programme en langage machine), PEEK et POKE sont 
conservées. Au lieu d'ASC, on utilise ORD comme en PASCAL 
et, comme en PASCAL, on distingue les identificateurs sur 
plus de deux caractères et l'affectation s'écrit := .Mais 
si vous écrivez A=B, le système corrigera automatiquement 
en A =; 


Ph svt 


Programmation structurée 


COMAL ajoute à BASIC les constructions classiques 
de la programmation structurée. 


Le IF THEN ELSE est introduit sous la forme: 
IF...THEN...ELIF...ELSE...ENDIF qui est en fait légère- 
ment plus facile à manipuler que les ; en PASCAL. La 
clause ELIF est exactement la même que ELSIF de ADA 
(sinon st...). 


Les boucles sont: 


WHILE...D0...ENDWHILE (tant que::.-Ffalrerz 4:50 
REPEAT...UNTIL (répéter...jusqu'à...) 
FOR.:..D0...NEXT (qui ne diffère de BASIC que par 


la présence de DO) 


Enfin on dispose de CASE avec elause OTHERWISE 
que tous les PASCAL n'ont pas: 
CASE...0F...OTHERWISE. ..ENDCASE 


Le fait que chacune de ces constructions se ter- 
mine par un END approprié est beaucoup plus facile à ap- 
préhender que les BEGIN...END et ; de PASCAL. 


Les sous-programmes 


COMAL dispose d'un mécanisme de sous-programmes 
appelables par nom symbolique et capables de transmettre 
des arguments. Ce sont les procédures. Une procédure est 
définie par: 


PROC nom(arguments) 


.. 


ENDPROC nom 
et elle est appelable par EXEC nom (il n'y a plus de 
GOSUB). 


Au niveau des arguments, la gestion est aussi 
perrectionnée qu'en PASCAL puisqu'on dispose de deux sor- 
tes d'arguments, les arguments simples qui sont copiés 
dans le sous-programme (transmission par valeur), et les 
arguments REF qui sont gérés comme les arguments VAR de 
PASCAL, avec transmission par adresse: 

PROC TOTO(A,B,REF X) 


Lorsqu'un tableau est transmis (par REF) on le 
fait figurer avec des dimensions vides: 
PROC TOTO(REF MAT( , )) 
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NX 


SET 





— 
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On peut rendre locales toutes les variables d'une 
procédure en terminant sa déclaration par CLOSED: 
PROC TOTO ( ) CLOSED 


Enfin il y a la récursivité. Donc on peut dire 
que, dans le domaine des sous-programmes, on atteint le 
niveau de PASCAL. 


Autres particularités 


Les particularités de COMAL seront étudiées en 
détail dans nos prochains numéros. Ici, nous n'avons que 
la place de dire que le souci constant des concepteurs de 
COMAL a été de conserver la simplicité de BASIC en amé- 
liorant quelques détails par endroits. 


Ainsi la puissance du traitement de chaînes de 
BASIC est intégralement conservée, mais, cette fois, le 
nombre maximum de caractères doit être déclaré par DIM 
DIM A$ OF 15; 
L'extraction de sous-chaîne est plus simple qu' 
en BASIC: A$(5:3) s'écrirait en BASIC MID$(A$,5,3) 


Les ordres d'écriture et de lecture de fichiers 
disques existent sous la forme OPEN, READ FILE, WRITE 
FILE, CLOSE. Ils peuvent manipuler les fichiers relatifs. 


D'autres simplifications de détail sont, par ex- 
emple l'écriture A:+1 à la place de A:=A+1 
ou encore le fait que les instructions peuvent recevoir 
un label: 

ICI: ASS ADR : 

et les GOTO se réfèrent à ces labels symboliques et non 
aux numéros de ligne: GOTO ICI. C'est infiniment plus 
parlant. 


L'éditeur COMAL 


Comme pour BASIC, les programmes COMAL sont en- 
trés sous le contrôle d'un éditeur qui a certains avanta- 
ges par rapport à BASIC. 

- Il y a une numérotation automatique. (AvTe. 

- Quelle que soit la manière dont une instruction a é- 
té entrée, on a au listing une indentation qui met la 
structure en évidence. 


- Il y a moyen de sauvegarder sur disque des morceaux 


niet 


Len 


de programme et surtout de charger un programme par mor- 
ceaux à partir du disque, donc de gérer des bibliothèques 
de sous-programmes usuels. 


- Enfin, l'avantage le plus important, surtout pour 
les débutants, est que les instructions sont examinées 
lors de la frappe et que le système n'accepte pas une 
instruction qui n'est pas syntaxiquement correcte. On n'a 
pas à attendre l'exécution pour avoir certaines fautes 
signalées. 


Conclusion 


Après quelques essais, nous pensons que COMAL fe- 
ra un "malheur" surtout en enseignement, auprès des débu- 
tants. En effet, tout en conservant la simplicité de BA- 
SIC, il apporte certains avantages dont les plus essen- 
tiels sont: 


- programmation structurée 
- mécanisme de sous-programmes évolué 


-examen de la correction des instructions lors de la 
frappe. 


Il est bien possible que COMAL supplante BASIC, 
d'autant que l'adaptation à COMAL de programmes BASIC ex- 
istants est très simple. 


Si vous hésitez entre BASIC et PASCAL, adoptez 
COMAL. 


Daniel-Jean DAVID 
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* LE PASCAL DU:CBM.* 
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Présentation 


PASCAL est un langage évolué dont l'implémentation 
sur micro-ordinateur est très efficace et qui offre de 
nombreux avantages par rapport à BASIC. 


-une structure de blocs du type ALGOL 

-une structuration des données extrèmement puissante 
-la récursivité 

-l'allocation dynamique des variables 

-une grande lisibilité des programmes. 


Créé par N. WIRTH (Züurich,Suisse) à la suite des 
études sur la programmation structurée, PASCAL se compose 
de deux parties: 


-un compilateur qui traduit le programme dans un lan- 
gage machine appelé programme code (p-code) 

-un interpréteur qui simule un programme machine et 
exécute le programme code. 


Il existe une autre version, le PASCAL UCSD (Uni- 
versité de Californie à San Diego), dont le p-code est 
plus “facile à interpréter et qui a donné lieu à la réali- 
sation d'un processeur ayant le programme code comme jeu 
d'instructions (PASCAL Microengine de Western Digital). 


Le PASCAL COMMODORE a été écrit en Angleterre par 
TRANSAM COMPONENTS LIMITED et est du type Zurich. 
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Fonctionnement 


Il nécessite l'utilisation d'un CBM 3032 et d'un 
disque 3040. Il peut fonctionner sous deux modes: 


-un mode résident dans lequel le compilateur et l'in- 
terpréteur résident simultanément en mémoire . Ce mode 
permet d'apprendre le langage et d'écrire de petits pro- 
grammes n'utilisant pas les disquettes. 


-un mode disque dans lequel on appelle le compilateur 
et l'interpréteur séquentiellement. 


Dans les deux modes, PASCAL utilise l'éditeur du 
CBM avec tous ses avantages et quelques fonctions supplé- 
mentaires: 
-Auto: numérotation automatique 


-Upper, lower: mode majuscule ou minuscule 


-Break: appel du moniteur langage machine (.X retour- 
ne à PASCAL) 


-Number: rénumérotation 

-Find: recherche d'une chaîne 

-Change: recherche et modification d'une chaîne 

-Delete: effacement des lignes (mêmes paramètres que 
List) 

-Hex: conversion décimal-hexadécimal 


-Decimal: conversion hexa-décimal 


-Basic: retour à BASIC (nécessite #PASCAL pour reve- 
nir à PASCAL) 


-Put, get: pour sauver ou lire un programme sur dis- 
quette (le programme PASCAL est sous forme de fichier sé- 
quentiel). 


En mode résident: 


-R: run (compilation et exécution) 

-L: compilation et listing sur l'écran 

-P: compilation et listing sur l'imprimante 

-Disk: passage au mode disque (seul l'éditeur reste 
en mémoire). 
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En mode disque: 


-Resident: retour au mode résident 

-Comp nom de fichier: compilation 

-Ex nom de fichier: exécution 

-Link: permet de chaîner des programmes (compilation 
séparée) 

-Locate: permet de créer un programme exécutable à 
partir du BASIC (interpréteur + p.code) 


En plus, les commandes BASIC suivantes sont permises 
en mode direct: 


PRINT(ou ?), PRINT#, OPEN, CLOSE, CMD, POKE, SYS, 
FOR, LET ainsi que les commandes du DOS SUPPORT (»,f,/). 


Avantages et extensions du PASCAL-CBM 


Il s'agit d'extensions par rapport au PASCAL stan- 
dard tel qu'il a été définit par WIRTH,et qui permettent 
d'utiliser les avantages du CBM. 

-Spécification des noms de fichiers 


-Lecture de chaîne de caractères 


-Utilisation des nombres hexadécimaux;très utile pour 
les entrées-sorties: 


const portA-=$e8uf; 


begin 


poke(portA,$3f); 


-Accès à la mémoire d'écran: 


.La procédure VDU(x,y:integer;c:char) mémorise 
le caractère c à la ligne x,colonne y de l'écran. 


.Page efface l'écran. 

.La fonction getkey: char permet d'obtenir le 
caractère lu directement sur le port du clavier. El ny 
a pas de caractère on obtient la valeur chr(0); donc pour 


attendre la frappe d'un caractère on écrira: 


while getkey =chr(0)do; 


Pr Ponant 27 


-Entrées-sorties hexadécimales: 


.wrhex (f:text;x:integer) écrit x sous forme de 
} chiffres hexadécimaux sur le fichier f. 


.wrhex2 (f:text;x:0..255) écrit l'octet x sous 
forme hexadécimale sur f. 


exemple: 
rewrite(printer,4,0) 
wrhex(printer,-1);wrhex2(output,3) 
écrira FFFF sur l'imprimante et 03 sur l'écran 
.rdhex(f:text):integer ;cette fonction lit une 
valeur sur 16 bits (4 chiffres hexadécimaux) sur 
le fichier 
-Fonctions binaires: ANDB, ORB, XORB, NOTB, SHL et 
SHR : 
Ce sont des fonctions logiques qui opèrent sur 
des entiers traités sur 16 bits. 
-Masquage des erreurs d'entrées-sorties: 


.iotrap(false) protège le programme d'une sortie 
innoportune due à une entrée invalide. 


.iotrap(true) restaure le fonctionnement normal. 
.-iocerror: integer donne le type d'erreur. 
-Touche STOP: 


Breaks(true) et breaks(false) autorise et inter- 
dit la touche STOP. 


-Générateur de nombre aléatoire: 
random: 0..255 
-Horloge interne: 
trois fonctions sont prédéfinies: 
-hours: integer 
.minutes: integer 
.Seconds: integer 
exemple: 


settime(13,30,00); 


RE ciel nT 


IS 


writeln(hours,':!',minutes,':',seconds); 
affichera: L3> 30%, 10 


-Chaînage des programmes: 


chain(nom de fichier) arrête l'exécution du pro- 
gramme en cours, charge le programme référencé et le lance 


-Interface avec des programmes écrits en langage ma- 
chine: 

Les programmes écrits en langage machine sont 
déclarés en PASCAL-CBM comme des fonctions ou des procédu- 
res dont le corps est remplacé par le mot "extern" suivi 
de l'adresse en hexadécimal.Les paramètres sont transmis 
par pile. 


-Compilation séparée: 


Le PASCAL-:-CBM permet de compiler un programme en 
plusieurs morceaux et de le réunir par une seule commande. 
Ceci est très utile pour les gros programmes. 


CONCLUSIONS 


Le PASCAL-CBM est très satisfaisant: 


-La version du langage est complète et,avec les pro- 
grammes de gestion de chaînes de caractère qui sont livrés 
avec la disquette,est supérieure à la version UCSD. 


-Les extensions permettent de profiter des ressources: 
du CBM, notamment l'IEEE. 


-Les fonctions de manipulation de bits et la possibili- 
té d'écrire des sous-programmes en langage machine en font 
un véritable PLM. 


-Son utilisation s'avère agréable (DOS SUPPORT, répéti- 
tion sur les touches, fonctions de confort...), mais at- 
tention!ine pas oublier de sauver un programme après édi- 
tion et avant compilation! 


-En moyenne les programmes s'exécutent plus vite qu'en 
BASIC. 


Avec de tels avantages, il serait souhaitable de 
disposer d'un véritable compilateur (traducteur code-p, 
code 6502) permettant une bonne utilisation en temps réel. 


Jean-Luc DESCHAMPS 
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COMMENT ACCELERER L'EXECUTION 


* * 
* * 
* * 
* DE VOS PROGRAMMES BASIC * 
* * 
* * 
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Le BASIC du P.E.T./C.B.M. est un des plus rapides 
du marché (ce fait est bien connu). Il surclasse nette- 
ment ses concurrents directs et il est vrai qu'il est re- 
marquable pour un BASIC interprété. 


Un certain nombre de précautions ou d'astuces d'é- 
criture des programmes vont être décrites dans cet arti- 
cle et les suivants de cette série, qui vous permettront 
d'augmenter encore les performances de vos programmes 
BASIC, de façon assez sensible. 


Toutefois, notez bien que les recommandations qui 
vont être présentées vont à l'encontre de la structura- 
tion du programme et de sa lisibilité. Vous avez donc un 
choix à faire et il est conseillé aux débutants de les 
suivre avec prudence. 


Pour savoir comment accélérer l'exécution des pro- 
grammes, il faut comprendre par quels mécanismes cette 
exécution est ralentie lorsqu'on utilise un interpréteur 
BASIC au lieu du langage machine. On peut dire que ces 
mécanismes se décomposent en deux étages: 


1) étage compilation qui résulte du fait qu'on utilise 
un langage évolué au lieu du langage machine. Les antido- 
tes que nous proposerons à ce niveau seront valables aus- 
si pour BASIC compilé. 


2) étage interprétation qui vient de ce que c'est un 


interpréteur qui est utilisé, ce qui occasionne des per- 
tes de temps supplémentaires. 


Up Me 


FI | 
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* * 
* ETAGE COMPILATION * 
* * 
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Les pertes de temps qui apparaissent à ce niveau 
viennent toutes du fait que, pour éviter de devenir d'une 
complexité inextricable, un compilateur (ou un interpré- 
teur) est obligé d'avoir une attitude stéréotypée stan- 
dard vis-à-vis de votre programme. Il ne peut pas traiter 
de façon particulière tous les cas particuliers. 


Si vous écrivez Y=X2 ,; ceci sera exécuté sous 
la forme Y=exp(2*log(X)) exactement comme si la puis- 
sance avait été fractionnaire. Très peu de compilateurs 
prennent la peine de traiter de façon particulière la 
puissance entière et de remplacer votre expression par 
VEXTE. 


Autre exemple 


Si dans une expression arithmétique, vous avez 
plusieurs fois la même sous-expression, le compilateur ou 
l'interpréteur ne le reconnaitra pas et donc le calculera 
à chaque fois. 

Ex: Y=(X+1)*(X-1)-K*LOG(X+1) 
Facilitez les choses en définissant U=X+1 
Y=U*(X-1)-K*LOG(U) 


Ceci nous amène à nous rendre compte de ce que le 
compilateur ou l'interpréteur fait exactement ce qui est 
écrit, sans optimiser (sauf compilateurs de très grosses 
machines). 


Si vous calculez une constante dans une boucle, 
celle-ci sera recalculée à chaque itération: 


LOR Taeus ais 

E=EXP(1) 

NEXT 

remède: sortez la constante de la boucle! 
E=EXP(1) 
PORTES Cap 
NEXT 





Voici un exemple plus subtil. Supposons le test de 
deux conditions en cascade: 
LF :C1 AND C2 THEN ... 
Cette écriture implique l'évaluation de C1 et de C2 et 
l'opération AND tandis que si l'on écrit 
TE C1 THEN IF C2 THEN :., 
on passe à la suite dès que C1 est fausse. 


Pour aller plus loin, il faut réfléchir avec soin 
à la structure de son programme. C'est toujours 
recommandé, et même, avant d'être fier d'optimiser une 
opération, il faut toujours se demander si elle est bien 
nécessaire. 

Voici un exemple très classique: on recherche si K 
est présent dans un tableau C(N). La première écriture 
qui vient à l'esprit est: 


l'O PORT I=T"TO N 
110 IF C(T)<K THEN PRINT "OUI": GOTD 140 


lADNEXT"T 
130 PRINT "NON" 
HOT BULDÉ rer 


Eh bien cette écriture implique deux tests par itération: 
le test d'égalité et le test d'achèvement de la boucle. 


Si l'on dimensionne C à N+1 et qu'on écrit: 
100 C(N+1)=K:I=1 
1:10 TF C(T)KYK THEN I:=T+1:GOT0 110 
120: LE ICN+1 THEN PRINT "OUIL'":GOTO0 140 
130 PRINT "NON" 


On n'a plus qu'un test dans la boucle. 
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# % 
* ETAGE INTERPRETATION * 
* * 


KXXE XX EX EX XX # XX XX XX XX 


Une des raisons principales de perte de temps d'un 
interpréteur sur un compilateur est que l'interpréteur 
retraduit les instructions à chaque fois qu'il passe des- 
sus. Dans une boucle, les instructions de la boucle sont 
retraduites à chaque itération. 


A cela, nous ne pouvons pas grand-chose, mais il y 
a d'autres éléments sur lesquels nous pouvons agir. Le 
point est que à chaque fois qu'il y a référence à une 
constante, celle-ci est recalculée, à chaque fois qu'il y 
a référence à une variable, celle-ci est recherchée dans 
la table des variables et à chaque fois qu'il y a réfé- 
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rence à une instruction, celle-ci est recherchée parmi la 
suite des instructions. | 


Constantes 


Le remède pour les constantes est qu'il vaut mieux 
les éviter. A chaque fois que vous utilisez une constante 
comme 25497, l'interpréteur va chercher chaque chiffre et 
effectue le calcul (((2*10+5)*10+4)*10+9)*10+7. 

Il est souvent plus rapide d'avoir fait K-25497 et 
de rechercher K. 


Variables 


A chaque référence à une variable, celle-ci est 
recherchée dans une table des variables en mémoire, alors 
qu'avec un compilateur, on fait référence immédiatement à 
l'adresse de la variable. Ceci est .une des plus grandes 
sources de perte de temps de BASIC interprété. Dans son 
livre "La pratique du P.E.T./C.B.M. volume II", D-J DAVID 
donne l'exemple d'un produit de matrices 41 par 41. Le 
programme BASIC prend 27 mn contre 2 mn en langage- 
machine! 


La boucle la plus interne de ce produit de matrices est 
écrite: 
COTE, J)=0 
FOR K=0 TO N 
CECI, J)=C(I,J)+A(I,K)*B(K,9) 


NEXT K 
Dans l'instruction de sommation, on a 
3 recherches de I 
2) " " J 
2 " 1" K 
2 " LL (ee 
1 recherche LeA 
1 " " B 
au total 11 recherches 


Si l'on écrivait 
Z=0 
FOR K=0 TO N 
Z=Z+A(I,K)*B(K,d) 
NEXT K 
C(l:d)e7Z 
on n'aurait plus que 8 recherches. De fait, écrit de cet- 
te manière, le programme ne prend plus que 18 mn! 


Un autre moyen d'accélérer, lorsqu'on a beaucoup 
de variables, vient du fait que la recherche est faite 
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dans l'ordre de la table, c'est-à-dire dans l'ordre chro- 
nologique où les variables ont été définies. Lorsqu'on a 
un certain nombre de variables qui sont plus fréquemment 
utilisées que d'autres, il est fondamental d'assurer 
qu'elles soient en tête de la table, en les initialisant 
au début du programme, par ordre de fréquences d'emploi 
décroissantes A=0:B=0 ... 


Un autre élément est du au fait que les variables 
simples et les tableaux sont dans deux zones consécutives 
en mémoire. Si jamais on crée une variable nouvelle, tous 
les tableaux déjà crées doivent être déplacés. Par consé- 
quent il est conseillé, lorsqu'on a de grands tableaux, 
de définir toutes les variables simples en tête du pro- 
gramme. Cela évitera de longs déplacements des tableaux 
en cours de programme. 


Le "garbage collection" 


On désigne ainsi la routine qui compacte les chaî- 
nes de caractères inutilisées pour récupérer de la place. 
Elle risque de prendre beaucoup de temps en CBM 3000 
(elle a été très améliorée en BASIC version 4.0) lorsque 
l'on constitue des chaînes de caratères par concaténa- 
tions successives. On diminue beaucoup ces temps en frac- 
tionnant le regroupement ce qui se fait en appelant 
FRE(O) à intervalles réguliers. 


Instructions 


Tout GOTO ou GOSUB entraîne une recherche de 
l'instruction cible en fonction de son numéro. Si le nu- 
méro cible est inférieur au numéro de la ligne de départ, 
on parcourt toute la chaîne des instructions à partir du 
début. S'il est supérieur, on parcourt la chaîne à partir 
de la ligne de départ. 


On gagne d'autant plus de temps que le parcours 
est moins long. Cela implique les trois conseils sui- 
vants: 


1) Avoir le moins de numéros de ligne possibles, donc 
mettre plusieurs instructions par ligne et éviter les 
REM. Notez que cela nuit à la lisibilité. 


2) Les branchements en avant doivent être courts. Ce 
n'est pas toujours possible. 


3) Les branchements en arrière doivent aboutir près du 


début du programme: il ne sert à rien qu'une boucle avec 
GOTO en arrière soit courte, il vaut mieux qu'elle soit 
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au début du programme. 


De même,on a intérêt à mettre au début du programme 
un sous-programme appelé souvent. 


AGO LOUINES Me. j'alEn) El ah - miss dessein 
PORTE Der M OMANTIT ss … OMR ASAUS. Lo de 
Re est meilleur que 60 GOSUB 1000 
FODESeEe22 hbadnmes. false nat LES EL porte 
APS NS OO me boss 
GOSURETE AND =, ss.» Non Nes ER ans Etes 


Tant qu'à faire de mettre des REM, il vaut mieux 
les mettre en fin de programme, ainsi que les DATA. 


RSETISETESEEE) 
$ $ 
$ CONCLUSION $ 


$ $ 
SÉSSSSSSSSSSSS 


Tels sont les quelques conseils qu'on peut donner 
pour exploiter au mieux les particularités de l'interpré- 
teur BASIC. Certains des conseils donnés vont de pair 
avec un gain de place, comme nous le verrons dans un pro- 
chain article; d'autres sont au contraire contradictoires 
et nécessitent un compromis. 


Pour gagner encore plus de temps, un recours exis- 
te: BASIC compilé (nous en donnerons un banc d'essai dans 
le prochain numéro), ou le langage machine. 


Enfin d'autres astuces que celles données dans cet 
article existent certainement. Nous les décrirons dans 
nos prochains numéros, à mesure qu'elles auront été 
expérimentées. Nous demandons, bien sûr, à nos Lecteurs, 
de nous faire part de leurs découvertes, et expériences: 
elles profiteront certainement aux autres Lecteurs. 


Daniel TRECOURT et Pierre Etienne THALBERG 
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* * 
* UNE APPLICATION ULTRA-SIMPLE SUR CBM 8000 * 
* * 
be UN MINI-ANNUAIRE TELEPHONIQUE % 
# * 
* # 
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Voici un programme qui vous permettra de retrou- 
ver instantanément les numéros de téléphone de vos amis 
et aussi de découvrir quelques principes de programmation 
du CBM. 


On suppose que le fichier annuaire existe déjà. 
Pour le créer avec au départ "zéro" nom, vous tapez en 
mode direct: 


DOPEN#2,"FICH-ANNUAIRE,W" 
PRINT#2,"0"; CHR$(13) ; : DCLOSE 


En régime de croisière, votre fichier disque aura 
la structure suivante: nombre d'individus (N) puis pour 
chaque individu I son nom (NOM$(I)) et son numéro (X$(I)) 
N est au maximum 100. 


Le programme commence par un appel au sous-pro- 
gramme 1000 qui a pour effet de lire le fichier dans son 
état actuel en mémoire: 


on reconnaît - l'ouverture du fichier en lecture (1000) 
- la lecture du nombre d'individus actuel N 
- la boucle qui lit les N couples nom/numéro 


Ensuite le programme procède par menu: l'utilisa- 
teur devra taper la lettre correspondant à la commande 
qu'il désire. Les commandes au choix sont: 


E entrée de nouveaux noms qui viendront se rajouter à 
la fin de l'annuaire. 
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R recherche d'un numéro: vous fournissez un nom et on 
vous imprime le numéro correspondant, ou le message "pas 
trouvé" s'il n'est pas dans l'annuaire. 


L/P liste de tout l'annuaire sur l'écran (L) ou 
l'imprimante (P). 


S sauvegarde de l'annuaire sur disque (avec les 
nouveaux noms que l'on a ajoutés). 


On trouve de 85 à 130 les branchements vers les 
différentes commandes. 


En 500, l'entrée d'un nouveau nom. N est augmenté 
de 1: 


En 700, listing du fichier. On utilise le fait 
que l'écran peut se manipuler par PRINT # avec le numéro 
de périphérique 3. Si la liste est sur écran on fait P=3, 
si elle est sur imprimante, on fait P=4 puis on parcourt 
tout le fichier dans une boucle. 


Le cas de l'écran pose un problème: il faut lais- 
ser le temps de lire les noms d'où l'attente qu'on ait 
appuyé sur SHIFT (WAIT 152,1) avant de passer à la com- 
mande suivante. 


EN 800, écriture du fichier sur disque. On crée 
avec ( de remplacement) un fichier de même nom que l'an- 
cleñ: 


On remarque que toutes les impressions se font 
avec mouvements de curseur qui soignent la mise en page. 


Perfectionnement 


Le programme tel qu'il est souffre de quelques 
imperfections (en plus de son caractère simplet): 


1) Lorsqu'on fournit une lettre de commande, Lil faut 
taper RETURN. 


Si l'on remplaçait l'instruction 80 par: 
80 GET A$: IF A$="" GOTO 80 
il suffirait de taper la lettre de commande pour déclen- 
cher l'exécution. 


2) Dans la commande d'entrée des noms, après chaque 


nom on a le menu et on doit refaire E pour entrer un 
autre nom. 
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Au lieu de revenir au menu, on pourrait poser une 
question du style "tapez A pour un autre ou M pour 
revenir au menu". 


Pour cela, avec l'instruction GET que nous venons 
de découvrir, nous pouvons écrire: 


520 PRINT'"'bDTAPEZ A POUR UN AUTRE,M POUR REVENIR AU 
MENU" 

530: GET AS:TE A$=MMAGOTO, 530 

54O IF A$="A" GOTO 500 

550 GOTO 20:REM ON REVIENT AU MENU DES QUE A$«>'"A" 


On pourrait faire la même modification avec la 
commande R. 


3) Le problème du temps de lecture sur écran que nous 
avons évoqué ne se pose pas qu'à la fin s'il y a plus de 
20 noms. 

On peut écrire: 


700 OPEN 1,P (sans changement) 
T0: LR 
110 FOR I=1 TO N (sans changement) 


715 L=L+1:IF L=20 AND P=3 THEN GOSUB 750 
720 PRINTÆ#1,NOM$(I),X$(I) 

730 NEXT I (sans changement) 

740 CLOSE 1:IF P=3 THEN GOSUB 750 

745 GOTO 20 

750 (sans changement) 

760 WAIT 152,1:L=0:RETURN 


On voit que 750-760 est devenu un sous-programme. 
On a introduit un compteur de lignes L. Remarquez 
la condition composée en 715: 


si L=20 (trop de lignes) et P-3 (impression sur 
écran),alors appeler 750 pour marquer l'attente. 


Daniel-Jean DAVID et Jacques COUTHURES 
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PASCAL : UN UTILITAIRE 
POUR LA MISE AU POINT 


ET LA DOCUMENTATION DES PROGRAMMES 


* * 
* * 
* * 
* * 
* * 
* * 
* * 
* * 
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Ce petit utilitaire a pour but de fournir un listing 
d'un programme PASCAL en donnant la reférence croisée des 
noms utilisés dans le programme. La liste des noms de va- 
riables et des mots-clefs est classée alphabétiquement et 
permet l'ajout de nouveaux noms de variables sans inter- 
férence avec les précédents. 


Ce programme permet de voir la manipulation des 
structures dynamiques et démontre la "simplicité" d'un 
classement alphabétique lorsqu'on utilise la récursivité. 


On notera la manipulation des entrées-sorties du CBM 
en PASCAL. 


La numérotation des lignes se fait de la même maniè- 
re que l'éditeur, ainsi il est très facile de retrouver 
une ligne et une variable. On peut très facilement passer 
à la numérotation du compilateur, il suffit pour cela de 
remplacer: 

n:=990 par  n=0 aux lignes 1750 et 1860 
n:=n+10 par n':=n+1 à la ligne 1870 


La gestion des commentaires peut paraître assez com- 
pliquée, mais ceci est du au fait qu'il y a deux caractè- 
res pour annoncer un commentaire. Une autre méthode au- 
rait pu consister à lire une ligne en bloc dans un ta- 
bleau de 80 caractères. 


Bon courage et à vos claviers. 


Jean-Luc DESCHAMPS 
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l:=l+il;iuwuritetimerimante,x<T. lighe:c3):x:=xT. prochain 
until x=ni 1; 
ur-i te Inlimertimante) 
end: ‘ 


besin if w£iinil then 

beain imeri_arbreluf, sauchers 
der no Eur); Theri-2P ere CT. grotte? 
sn end ? 


erd: _— 
+ debut du £rosramme #2 
É# initialisation des usriasbles et des fichiers 22 
_kesin racine : eni lifh:=996; k1:=01:; 


EU: 
mcm suslenskts 


 writelné"hom du erosramme 7 ‘2: 


: read(romftich) ; 
 résetif. homticho: 
- reurite imerimante.d, 2565; 
writelincimerimante. chr 1479: chr€1), “PROGRAMME ”nomfich, chr(123)): 
write lnéimerimante); 
readi#f.ch): 
| besin if n=cd then n:=390: ER pis" ie 
Fi: =n+1Guni tac imerimantesn: cos 
write imerimante, * ‘2: 
‘ubri le not. eolnéf “ic 
“Eesin 





lecture d'un mot et PRE dans la liste # 


iT én INnlL'2".."2 ] then 
besir K:=6; 5 
rebeat if k£el +ther 
“begin k:=k+1;alk]:=ch; pee 
uritelimerimante: SF); 
- .. if not eolné#s then resdif, ch} else ch:=° *; 
end: 
untitnot(otränt "af: "z: - 
if K2=k1 then El'=k else | 
rereat alkij:=" st isket=t _ 
until K1=k; - sé 
eacka, l,idi:recherchetracine) 
end élse pitié 
egif 


_e test se commentaires #5 


if che é then: 
Hesir imeri_carichiiread(#f, chi; su:=1; 
if ch=°k" then 

repeat repeat imkri_cartchi;readtf, ch) 
until che°#"; 

tuer i car (oh) ;readtf, 6h ; 
FETE fs SL urrti 1 ch=’if;s STARS RE 

Ed, “4 

(k test des literaux #> se 
if Se besin nes 





u 





Cd or F4 


Zirg rereat imori_caréchiireadéé$, ch) 

2158 until ch=°*** end: 

2194 if susg then kesin impri_carichiiresd(f.ch) end else. su:=û 
2295 ‘end 

2219 end: ee a. Re; 
see rite ncimerimarte, ch): if hot eo o$t 8 then readé+, ah) 
2234 a 

2240 PnLtelnt imprimante): 
ee. write lnéimerimante, Ghrel 
ecE ri te né imprimantes 
&er impri _srbretracimes 
228 end. 7 à es 





REFERENCE CROISEE ehr 129993 | 






._, Note, à titre d'exemple, le début de la table des 
références croisées obtenue en appliquant ce programme à 
lui-meme. 














REFERENCE CROI: 











"1610 1686 a 
205@ 2080. . 


. 1929 1 





in 
PT a 











inr-imante es 
34. 1876 46 


Er4 ÉE 27 


KXKHXNX XX XX XX XX XX XX XX K XX XX XX XX XX XX À XX XX XX X X XX X X X X X X XX X 


* # 
* UN TRUC SENSATIONNEL: SPOOLING DISQUE-IMPRIMANTE * 
* * 


KKKKKEEXEXXX XX XX XX XX HA À XX X XX X XX À X XX X XX À XX À XX XX XX XX XX X 


Le CBM vous permet de faire une chose qui n'est 
possible normalement que sur grosses machines. Vous pou- 
vez faire autre chose en même temps que se déroule une 
longue sortie sur imprimante. Sur grosses machines, tou- 


tes les sorties se font sur disque (donc vite), puis une 
tâche auxiliaire appelée le SPOOL fait le transfert dis- 
que-imprimante, en simultanéité avec d'autres traite- 
ments. 


S 


Grace à l'IEEE et à ses périphériques intelli- 
gents, le CBM vous permet de procéder exactement de la 
même manière. 

Supposons que nous ayons un long listing à faire; 
on fait: 


1) OPEN 0.,8,6;,10:LI,S;,N" 
CMD 8:LIST 
PRINT#8:CLOSE 8 


Ceci effectue le listing sur disque. 


2) Charger le programme que l'on voudra exécuter pen- 
dant la sortie sur imprimante. 


3) OPEN “6,8,8,"0:L7" 
POKE 165,72:SYS A:POKE165,104:SYS A 
OPEN 4,4:CMD 4:POKE 176,3:POKE 174,0 


REMARQUE: A vaut 61668 sur CBM 3000 et 61695 sur CBM 
}000/8000. 


4) Le listing démarre. Faire fonctionner le programme 
chargé en 2. Attention: celui-ci ne doit en aucune façon 
utiliser le bus IEEE. 

5) Lorsque tout est terminé: 


PRINT#4H:CLOSE U:OPEN 8,8,8:CLOSE 8 


Pierre-Etienne THALBERG 
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KKKKRHEKERÉEREREEREEREX EX XX XX EX XX XX À XX XX 


* * 
* L'INTERFACE SONORE SUR LE PET/CBM * 
# x 


KKKÉERÉEXEXEEX EE EX EX EX EX EX EX KE EX EE XX XX 


Beaucoup de montages sont possibles pour commander 
un haut-parleur à partir de votre PET/CBM. Le montage le 
plus répandu correspond au schéma ci-dessous: 





Les créneaux sont captés sur la broche CB2 (borne M 
du connecteur du port utilisateur) du boîtier 6522. La 
masse est prise à la borne N du même connecteur. Le si- 
gnal amplifié par le transistor 2N2222 (ou n'importe quel 
type npn) passe au +5V à travers la bobine mobile du 
haut-parleur. Le 5V est pris sur le connecteur du magné- 
tophone. Il constitue une alimentation parfaite tant 
qu'on ne demande pas trop de courant. Notons que sur CBM, 
on peut en obtenir plus que sur les anciens P.E.T. 


On peut insérer un potentiomètre pour avoir un ré- 
glage de l'intensité sonore. Un petit condensateur (0,1 
pF) en parallèle sur le 1k rend le son plus sinusoidal. 


Programmation 


Ce branchement est le plus employé car il est le 
plus facile à programmer: il suffit de quelques POKE. La 


1 AT ON: CEA 





génération des créneaux est automatique alors que dans 
d'autres montages, il faut générer complètement les cré- 
neaux et les délais. 


En effet le boîtier 6522 contient un registre à dé- 
calage de 8 bits à l'adresse 59466 ($E8HA). Si l'on met 
dans ce registre un motif binaire M formé de O0 et de 1, 
on aura des créneaux à la mesure des décalages. Les déca- 
lages sont activés si l'on met (par POKE) 16 dans le re- 
gistre de commande du 6522, d'adresse 59467 ($E8U4B). les 
décalages sont inhibés, donc le son est arrêté si l'on 
met O0 dans ce registre. 


La fréquence de décalage est déterminée par la va- 
leur T qu'on met en 59464 ($E848): ce registre est le re- 
gistre de comptage d'un des temporisateurs du 6522. Une 
fois les décalages lancés, le phénomène continue de lui- 
même: il y a en fait rotation dans le registre à décalage 
de sorte que lorsque 8 bits ont été décalés, le même mo- 
tif binaire M est prêt à être décalé de nouveau. 


La fréquence du son est déterminée à la fois par M 
et T. On comprend bien que,à T égal,si M=00110011 (51), 
la fréquence sera double de ce qu'on a pour M=00001111 
(15). Elle sera encore doublée pour M=01010101 (85). 
C'est un moyen simple pour faire des octaves. 


Le motif M détermine aussi le timbre: M=15 donne un 
créneau simple. M=00111111 (63) introduit de l'harmonique 
2 (cela ne transforme tout de même pas votre CBM en vio- 
L'on). 


La gamme 


En résumé, pour obtenir un son, il suffit d'écrire: 


E8EA POKE 59466,M : POKE 59464,T : POKE 59467,16 


et pour l'arrêter: E?+2 Esu8 
POKE 59467,0 (sinon il continue indéfiniment). 


Voici, pour M = 15, les valeurs de T qui donnent la gamme 

ut-3 242 sol 162 
ut # 228 sol# 152 
ré 215 la 4HOHz 144 
ré#k 203 la# 136 
mi 192 si 128 
fa 181 do 121 
fax LATE 
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KKKXXEXX XX XX XX XX XX XX XX XX XX X 


UN PIEGE DE CMD 
UTILISE EN CONJONCTION 
AVEC LE MONITEUR 


* 
* 
* 
* 
* 
* 
* 
x LANGAGE MACHINE 
* 

* 


* 
* 
* 
* 
* 
* 
* 
* 
* 
KKKEKXEXKX XX XX XX XX XX À X X X XX X 


Sur CBM 3000, lorsque vous vouliez obtenir les 
sorties sur imprimante, vous faisiez le classique: 
OPEN 4,4 : CMD 4 
puis vous lanciez le moniteur langage machine par SYS À 
(où on trouve un BREAK). 


Sur CBM 4000 et 8000, cela ne marche pas. En effet 
un BREAK annule l'effet de CMD dans la version BASIC 4.0. 
I1 faut entrer dans le moniteur langage machine, non par 
un BREAK, mais par l'entrée normale, donc par SYS 54386. 


KXKKKKKEEXX XX XX XX XX XX XX XX XX XX XX K X X X X XX X 


* # 
* ADRESSES ABSOLUMENT FONDAMENTALES * 
* & 


KKKKEKREXX XX XX XX XX XX XX XX XX XX X X X X X X X X X X 


KKKKKKÉEEEEREXX XX XX XX XX XX XX XX X X XX XX X X X X X XX X X X XX XX XX X X XX XX XX X X X 


* adresse * ancien *  PET/CBM * CBM * VIC * 
* * PET: * 3000 * 1000/8000 * * 
KKKÉKÉEKÉEEE XX XX X K XX X À X X XX K X K X XX X X X X XX X X X X XX K X XX X X X À # X X X À X X X X X x 


*  CHRGET % ÉCRAN S F1 S7T0 NM M IET OT ETS CR ST 115 * 


HKKKKEREEEREXX XX XX XX XX XX XX XX K X XX XX XX À X XX XX XX XX K X XX # X XX X X XX XX X X 


*  CHRGOT € SES, 200 # STE T8 À K7E TS À STo 21 .* 


KKKKKÉEEXEXEX XX XX XX XX XX XX XX XX XX XX XX XX XX XX XX XX XX XX XX XX XX XX XX X X XX X 


* moniteur * = # $SEFD11 *  $D472 * __ * 
*lang. mach.* * 6785 * . 54386 7 ® 
KKKEKEEREÉ EX XX XX À À À À XX XX X X XX À À XX XX XX X X X X XX XX XX X X X X X XX X X X X X X X X X 
*RESET tiède* $C38B $c389 # $B3FF 5 $c471 * 
*impri.READY* 50059 * 50057 * 16079 * . 50292 * 
ERKÉKKÉEEEX EX XXE XX XX XX XX XX K X XX XX XX XX XX À XX XX X XX XX XX # X XX XX X X XX X X 
6 RESET * _$FD38 » HPCDI *  $FD16 * ? Le 
# * 61821 AE GT 2 "2 6 HTO0 x x 


ELRERERÉERERÉEEEX XX XX XX XX XX XX XX XX XX XX XX X XX XX XX XX XX XX XX XX XX XX XX X 


Pret #7 








RAXLXEXXEXEXEREREEEREEEERÉEERERERERÉEREREKEREXE 


= - 
# LES JEUX COUSUS-MAIN : LE JEU DU PENDU * 
- * 


LEXEERESEEREEREREEEEREREREXEREEEEEREXREEEKEXEX 


Dans chaque parution de votre nouvelle revue vous trouverez une 
rubrique destinée à complêter vos connaissances, mais aussi à vous dis- 
traire. 


Pour le premier numéro, nous vous proposons le jeu du Pendu dont 
tous les écoliers se souviennent. A l'intention des élèves studieux qui 
n'y ont jamais joué pendant un cours de géographie ou de mathématiques, en 
voici les règles: 


Vous devez deviner un mot dont vous ne connaissez au début que 
le nombre de lettres qui le constituent. Si vous trouvez l'une des lettres 
du mot, celle-ci est placée au bon endroit dans le mot. Si vous choisissez 
une lettre inutilisée le dessin d'un pendu commence à se former sur 
l'écran de l'ordinateur; vous avez droit seulement à À erreurs, à la 
cinquième vous avez perdu ... et le mot mystérieux s'affiche au pied de la 
potence. 


Nous vous donnons ci-après le "listing" de ce programme qui 
fonctionne sans problème sur P.E.T 2001 et sur CBM 3008 - 3016 et 3032. 
Les touches ‘“curseur" sont indiquées en clair et entre crochets. Le 
"crochet ouvert!" est précédé d'un espace et le "crochet fermé" est suivi 
également d'un espace dont il n'y a pas lieu de tenir compte; tous les 
autres espaces des instructions PRINT doivent être scrupuleusement tapés 
au clavier. 


Les mots à trouver sont en DATA (lignes 5000 à 5110). Ils sont 
choisis de façon aléatoire (ligne 110); bien entendu il vous est possible 
de les changer en modifiant les lignes de DATA. Nous avons prévu un choix 
de 50 mots mais vous pouvez en ajouter dans de nouvelles lignes de DATA à 
condition de remplacer (ligne 110) le nombre 50 par le nouveau nombre de 
mots. 


Amusez-vous bien ... 


Jacques COUTHURES 


EAST 21 


IR 


TE! Cas LE | Se LE 
PAGE 
18 DIM L${2@>: DIM T{S@? 
2@ J = 1 
6@ PRINT " CCLRIJ ": TAB 133:" CRYVS] JEU COFF] CRYS] OÙ COFF] 
C#V5] PENOQU COFFJ “ 
ra C+ = nu“ 
F4 P$ = Cf 
SA FOR I = 1 TO 24 
SS L$CI) = "1 
3 HEXT I 
1AG K = ik = 0 
116 A = INT SA # € RHD 1922 + 1 
120 FOR I = 1, TO J 
138 IF T£I = À THEN 11& 
14@ HEXT I 
15@ T1 = À 
16@ FOR 1 = 1 TO A 
17@ FERADC A$ 
18 HEXT I 
19@ RESTORE 
28@ L = LEN “At; 
21@ PRINT " COCOWNI COOWNJ COCMN] ": TABC 523" à 
220 PRINT TAB So; CRYSJ  COFFI CRWSJ PF COFFJ p" 
239 PRINT TABC S>3" CRYSI  COFFI CRYSI PF COFFJ p" 
24@ PRINT TAB S2;" CRYSI  COFFI  CRYS] p COFF] p" 
250 PRINT TAB Sos" CRYS] BP COFFJ p" 
260 PRINT TAB£ Sdz" CRYSI  LCOFF] P" 
27@ FÜR I = 1 TO & 
280 PRINT TABC 523" CRYSI [OFF] " 
29@ HEXT I 
3@@ PRINT " CRYSI p w" 
31@ PRINT " CRYSIJ P COFFJ PF CRYVSI COFFJI N CRYS] 
32@ PRINT "  CRYSJ P COFFJ PF  CRYSJ  COFFJI N CRYSI w" 
339 PRINT " CRVS] P COFFI1 PF ERYSJI  LOFFI A CRVS] 
&4@ PRINT " CRYS] * 
36@ PRINT " CHOMEJ ";" COOWNI COOWNJ COCMNJ COCGUWNJ COCWNJ COOMNJ " 
37@ PRINT TABC 2G);"MOT DE ">L3"LETTRES" 
384 PRINT " COCWNI COOWNJ COCGMNJ COOWNJ COOUNJ COOMNJ COOWN] " 
AA PRINT TAB 2@;:"Y/OUS PROPOSEZ "; 
41@ INPUT R$ 
42 K = K + 1: = 6 
A43G C$ = C$ + R& 
45@ FOR 1 = 1 TO L 
460 E$ = MID$ £A$,1,1) 
F& IF E$ < > R$ THEN 514 
488 À = 1 
43@ Ltilr = F$ 
| Sa8 GOTO 2% 
| 518 GOTO S2@ 
| S2@ NEXT 1 
S36 IF À = 1 THEH 10m 
540 X = X + 1 
SS@ PRINT "“ CHOMEJ " 
Sée IF X > 1 THEN 64@ 
SP PRINT “ COQWHI COCMNI COCMNI COCWMNI ": 
SO PRINT TAB 132:"|" 


Æ Ée PA 





FE FAI: 


Ti D D D M M 


7 7 7 M M M 


QG PRINT TABS 1295" 21" 

18, ERENF CAES LEDs" 

26 PRINT TAB 12520 un 

36 GOT 1H 

44 IF # > Z THEH FER 

4 PRINT " COCMHI]  COCGHH] 
COCMNIT "3 

SU PRINT TARE Lio 

38 FRINT TABE 1e" 

96 PRINT TARBES 9ù:" |1" 

Abe FRINT TAB 9%" LS" 

14  GOTO 1444 

20: IF #2 S' THEN F2 

34 PRINT " COCMHI  COCHHNI 
COCHMHMIT  COQHHI ": 

4@ PRINT TAB 1253". |" 

où PRINT TAB£ 1222". |" 

6 PRINT TAB 1255"). |" 

ve, FRINT FAR 1893". nn 

84 GOTO 1444 

36 IF # 5 4 THEH 8Sé 

4 PRINT " COMM]  COCGHHNI 


COCGHHI ">; 
PRINT THE 
PRINT  TAEK 
PRINT  TAEK 
PRINT  TAERE 
SE GATO 1aaa 
PRIHT " 
CEUWIN I 
PRINT 
FRINT 
PRINT 
PRINT 
PRINT " 
GOT zaua 
FOR I = 
A = 


TA 
TAEK 
TAB 
TAB 


mis meme mel M Ni CO CO C0 


OS & GG D PJ + Gi 9 C0 
+ 0 Gi © © © Gi D GG 


COCHHT " 


FF CNT 
FÜR I = 1 
PRINT " 
HEËT I 
FFIHT 


14F& FOR I = 11 
LOS FRINT 7 Mi 
1494 HEXT I 
FRIHT 
FRIHT 
FOR I 
PRIHT 


COCHHT 
COCHIN 7 


COOIH 1 


1 TO L:P$ = 
F+ THEN 1544 


CHOME 1 
COCHIH 1 


PFIMT TAB: 


FRINT TAER“ 


15 Ê LIEN 0 
15 Ê LENERE 
1=> Ê " | | "n 


ER 2e L1 LL 


COCUNI 
ECOCLHI 
122" 

ter RE EE 
EAU IELE 
1is:" LULU" 
COCLHI 


ie 
F 


COCA 


2 : 
TO 19 
MIC$ 


FRIHT 
PRINT THE“ 
L TE 1 
LI: 





Pa 


PROFOHEIS 


P# + L#il) 


> "LETTRES UTILISEES" 


[en OO RS DE 


2& 


+ oo 27 


FE FA EE 08 SLI TE > 


114% 
115=a 
1168 
15H 


2644n 
£a 
exs a 
sat 
3&1& 
saza 
4aua 
4a1& 
4a2a 
4aze 
Sage 
aie 
SEzE 
SES 
Sté Et 
ELA Ts | 
LEE 
Sr E 
sage 
sage 
ia 
c11@ 


60 


HET I 
PRINT 3: FRINT 
GOTO 446 


PRIHT " CHOMEI "323 PRIHT " COCUHI] COCOUNI  COCOMHI COCOMNI  COCHHI] 


COCMNI  COOHHIT COCUNIT COOWHT CCOMNI COCWHIJ COCMNIJ  COCWHI 
COOMNIJ  COCANT COOWNI] COOUHI COOWHIT COCWMNI] COCMNI "> 
PRINT TAEX 145 :A#3: 

PRINT TAHBS 2@2:" VOUS GAGNEZ... I" 

GOTO 26H 

PRINT 

PRINT " CUP] "3 CHR$S <182: 
PRINT TABRS 165:"ALTRE ESSH 
IHPUT T# 

IF T$ = "H" THEN 3448 


Je € 1 


IF J > 49 THEN 4a@x 

GÜUTO 64 

FRENT " CELRI " 

PRINT " COCOWNIT COCMHI] COCGMHT COOUHIT  COCHMHI ">: 
GUTQ 4G2 

PRINT " CCLRI " 


PRINT " COOUNIT COCEINT COCHANT "3" LISTE EPUISEE, sesssssess" 
PRINT s PRINT " A TRES EIENTOT" 
END 


DATA FORT .KAOLIH.UIGHANM, PLASTIQUE ,CIHEMA 

CATA JARS.MARISON, TAROIH,HEXAGOHE . PRIMAIRE 

DATA £OUSPORE , £LEROTAGE . PREAL. XERANTHEME , 

CATA HASSINGUE . YULCANISATICON,S'NTHETIQUE 

CATA SYÉARITE,RUENTGENTRERAPIE ,RIDEALU,RIOOIR 

DATA RAJIA,.RAMASSIS , OIGNON ,OLEICOLE ,CECKERITE , CÉALATE , IASFURE 
CATR JAGLUEMART ,JOCRISSE , JOUVEHCELLE ,HAUSSIER 

CATA HAUTURIER .HEMEROTHEQUE , CONJONCTION, COURGE , COUTELAS .CREMONE 
DATR ARPETE ,ARQUEBLSE , AMORPHE , AHASTIGMATE , AFF IHEUR , ROHIOUR 
DATA AMOUR,RAYETTE , CLAMEUR , ECHAFAUC , ECHAUGUETTE , ECHIHOCERME 
DATA MISANTHROPIQUE , MONITEUR. RLIQNIYOQUE , MUCTLAGE 

DATA MUSCAROIH.OUTRECUICANCE , PARCOMETRE . PARIS'YLLARE , PAREGORIQUE 
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KKKKEKXX EX XX XX K À XX À # À # À K # À À # € 


* . 
* S'ABONNER GRATUITEMENT ? * 
# * 


KRKHKXEEX XX X XX KE XX XX XX XX XX XX X 


Comment vous abonner gratuitement pour votre 2 ème 
année ? C'est très simple ! Il suffit de nous renvoyer 
cette feuille complètement remplie accompagnée du régle- 
ment, avec votre nom et les noms de 5 de vos amis: vos 
amis recevront leur abonnement pour cette année, et, pour 
vous, votre abonnement sera automatiquement renouvelé 
l'année prochaine. 


_————- Je désire renouveler mon abonnement à La Com- 
mode, en parrainant les cinq amis dont les noms suivent. 


NOM mn mm 


adresse = 


——————————— Je désire m'abonner à La Commode (1 an, 4 
numéros = 120 F) 


NOM 


adresse "mm mm 


= Je désire m'abonner à La Commode (1 an, À 
numéros = 120 F) 


NOM "nn 


adresse =" mm 


G 
F ommode ne 4$ 


ET 


3°  PARRAINE 
= Je désire m'abonner à La Commode (1 an, 4 
numéros = 120 F) 


NOM mm 
adresse ------—"—— 


——————————- Je désire m'abonner à La Commode (1 an, 4 
numéros = 120 F) 


= Je désire m'abonner à La Commode (1 an, 4 
numéros = 120 F) 


NOM mm 
adresse ----—""" mm 
date ----------- signature ---"""""—- 
ci-joint réglement 5x120 F = 600 F 
par CC? CB 


N.B. Les cinq abonnements parrainés peuvent être 
servis à un même établissement d'enseignement. Joindre un 
bon de commande de l'établissement, et déduire du régle- 
ment une remise supplémentaire EDUCATION de 50 F d'où une 
somme de 550 F. 


A envoyer à La Commode 
28, rue Vicq d'Azir 
75010 PARIS 


A 22 7 











KKKKÉREXEX XXE XX EX XX EX XX X XX XX XX X X 


* # 
* ADRESSES DES ROUTINES IEEE * 
* # 


KRKKÉREREEXEX EEE EX EX XX XX XX KE XX XX 


KKKKKKEKXEX XX XX XX XX XX EX XX XX XX XX XX XX XX XX XX XX XX XX À K # XX X 


* 2001 + 3000 * 4000 * * 
il x * 8000 * ROLE * 
* déee * dec * dec, * L 
* hexa * hexa * hexa * à 


KKXKKEX EX XX K XX XX X XX XX XX X XX XX X X X À X XX X XX X XX X XX X X X X X X X X X X 
* 61622 * 61622 * 61650 * Envoi d'une adresse par- * 


* FOB6 * FOB6 * FOD2 *leur sur le bus IEEE * 
PR A Le EEE LR EE RE Pin 5 lan ne FE * 
* 61626 * 61626 * 61621 * Envoi d'une adresse écou-* 
* FOBA # FOBA * FOEBS5 “teur sur le busTIEEE * 
* * 


* 61740 * 61736 * 61767 * Envoi d'une adresse se- * 
* F12C * F128 * F148 #*condaire sur le bus IEEE * 


ST D TS UE NS LEADER EN ER DE Ye LE à ge ee Ne ete CE PR SIN EN RES SE EE Ve * 
* 61799 * 61807 * 61854 * Envoi d'un caractère sur * 
* F167 * F16F * F19E *le bus IEEE * 
a tan nn mi ann Gr ST a en ES n'as do ra et eg * 
* 61818 * 61823 * 61878 * Envoi de la commande . 
* F17A * F17F * F1B6 “cessation d'émission! * 
8 * * . (untalk) ” 
en ET ES CS, ER A RSS En * 
# 61822 * 61827 * 61881 * Envoi de la commande Li 
* F17E * F183 * F1B9 “*"cessation d'écoute" * 
* * * * (unlisten) * 
* * 


* 61831 * 61836 * 61888 * Acquisition d'un caractè-* 
#* F187 * F18C * F1C0. *re sur le:bus’IEBE Lg 


RRKRÉKRRERRÉRERKERERERERERERÉERÉERÉEEÉRÉLEÉEEREEXEX XXE XX XX À À À À XX X X 


Pierre-Etienne THALBERG 


FE Cite 27 


64 


KXKKKKKEEXEXX EX EX XX X 


# # 
* BIBLIOGRAPHIE * 
* # 





KKKKKKEE XX XX # XX X X 


ee 


LOTO Y 
A/R 


Nos confrères l'Ordinateur Individuel et Microsys- 
tèmes ont publié de nombreux articles relatifs au PET/ 
CBM. Voici un rappel de ces articles. 


L'Ordinateur Individuel 
Le PET au banc d'essai ne 1 pp. 20 oct. 79 
Programme de tri par insertion n£ 8 p. 34 juin 79 
Application tarification d'as- 


surance h2* 101 p« 52  sept.79 
Pendule électronique de table n£ 12 p. 44 nov. 79 
Interview de Chuck Peddle n°-12- p.102- nov: 79 
Jeu du Quotient Intellectuel nS 16: ph: 831 avr, 80 
Le CBM dans une parfumerie n° 18 p: 61 juin 80 
Syndicat intercommunal des eaux n% 22 p. 52 nov. 80 
Langage machine et assembleur n2 2} p. 93 fév. 81 


et n£ 25 p.109 mars 81 


Rappelons qu'à partir du numéro 10 (sept. 79) il 
y a dans chaque numéro un "A.B.C. du P.E.T.". 
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Microsystèmes 


Banc d'essai du P.E.T. n? 2 78 nov-déc 78 
La famille 6500 n£ 8 p. 65 nov-déc 79 
et n£ 9 p. 75 jan-fév 80 
Programme d'évaluation des 
ventes n? 9 p. 30 jan-fév 80 
140 programmes de jeux n£ 12 p. 65 juil-août 80 
La paie d'une PME n£ 12 p. 89 juil-août 80 
Le calcul de l'emprunt n£ 16 p. 62 mars-avr. 81 
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TOUS OUVRAGES ET ABONNEMENTS 
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Tous les ouvrages français ou étrangers signalés dans cette revue peuvent être obtenus ou commandés à La Nacelle 


2, rue Campagne-Première 75014 PARIS - Tél. 322 56 46 


Métro Raspail - Parking à la hauteur du 120 bd du Montparnasse 
ouvert tous les jours lundi compris, sans interruption de 9 h 30 à 18 h 50, samedi fermeture à 17 h 50. 
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SOCIÉTÉ 


FACTURE 


——____| CENTRALE 
ACHAT 
Micro 
INFORMATIQUE 


VOTRE FOURNISSEUR : 


Papier, Disquettes, Librairie, Micros, Cours, que 
vous soyez installateur, Revendeur ou bien 
Utilisateur. 


L'EXEMPLE DU MOIS 


TARIF UTILISATEUR 


Le MILLE H.T. 
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240 x || 3 EXEMPLAIRES 


FACTURE 26 LIGNES REF. F 10 
240 *x II 1.098,00 3 EXEMPLAIRES 
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